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«REM 2% 

IDENTIFICATION 
PRODUCT CODE: AC-F621D-MC 
PRODUCT NAME: CKKABDO 11/44 TRAPS 
DATE CREATED: OCTOBER, 1981 
MAINTAINER: DIAGNOSTIC GROUP 
AUTHOR: DAN MILLEVILLE 


COPYRIGHT (C) 1979, 1982 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 


THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE 
ON A_ SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION 
OF DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEFT 
AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC. 


THE INFORMATION IN TKIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FCR THE USE OR RELIABILITY OF 
ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 3 SEQUENCE 2 
$e Ve ABSTRACT 
THIS IS A TEST OF ALL OPERATIONS AND INSTRUCTIONS THAT CAUSE 
7 TRAPS. ALSO TESTED ARE TRAP OVERFLOW CONDITIONS, 


ODDITIES OF REGISTER 6, INTERRUPTS , THE RESET AND WAIT INSTRUCTIONS. 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 4 SEQUENCE 5 
2. REQUIREMENTS 
2.1 EQUIPMENT 
11/44 STANDARD COMPUTER. 
2.2 STORAGE 


2.2.1 PROGRAM STORAGE = THE ROUTINE USES MEMORY 
FROM 0000 TO 17600. 





SEQUENCE 4 
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. LOADING PROCEDURE 
3.1 ME THOD 
PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 
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4. 


4.1 


STARTING PROCEDURE 


THE PROGRAM STARTS AT 200. 


IF IT IS DESIRED TO RESET THE PASS COUNT BACK TO 
ZERO ; THEN START THIS PROGRAM AT LOCATION 210 


PROGRAM AND/OR OPERATOR ACTION 

LOAD PROGRAM INTO MEMORY. (BOTTOM 4k) 
LOAD ADDRESS. 

START. 

THE PROGRAM WILL LOOP. 


IT WILL PRINT ‘'CKKABDO 11/44 TRAPS'' AFTER THE FIRST ITERATION 
AND THEN PRINTS IT EVERY 15 TIMES(APROXIMATELY EVERY 15 SECONDS) 


eee 
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5. OPERATION 


5.1 SUBROUTINE ABSTRACTS 
5.1.1 BEGIN AT 200 
5.1.2 SCOPE 


IF A SCOPE LOOP IS NEEDED INSERT A BRANCH AS THE 
COMMENT TO THE HALT EXPLAINS. 


5.1.3 TRAPCATCHER 


THIS IS A SERIES OF INSTRUCTIONS DESIGNED TO DETECT AND 
ISOLATE UNEXPECTED TRAPS AND INTERRUPTS, THAT OCCUR IN THE 
TRAP AND INTERRUPT VECTOR AREA OF MEMORY. 


THE Seg Ta OF THIS ROUTINE IS: THE VECTOR ENTRANCE 
ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH WILL CON- 
TAIN A _ HALT (600000) (THIS LOCATION IS ALSO THE STATUS 

WORD FOR THAT VECTOR ENTRANCE. BUT THIS WILL HAVE NO EFFECT 
ON IT ALSC BEING THE NEXT INSTRUCTION) . 


IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 
REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, 
THEN is y 2 4345 SIX yee AS AN ADDRESS TO DETERMINE 
WHERE THE P oo. ae THE INTERRUPT 


OR 
TRAP OCCURRED; MEMORY AS SPECIFIED BY R6 CONTAINS THE 
PC OF THE RRISTRUCTION FOLLOWING THE INSTRUCTION WHERE THE 
TRAP OCCURRED. 

THE CONTENTS OF LOCATION ‘$TESTN'(304) CONTAINS 

THE TEST NUMBER THAT IT WAS DOING BEFORE IT 


’ Pp & 


5.2 PROGRAM AND/OR OPERATOR ACTION 


Dobet raged AND STARTING AT 200 STARTS - TEST. IF 
AN ERROR : DETECTED, THERE WILL BE A HALT. 
NOTE:IF A 7 tert LOOP IS NEEDED 
THE COMMENT SECTION OF THE HALT EXPLAINS 
HOW TO UTILIZE THIS LOOP. 
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15 6. ERRORS 
fA 6.1 ALL ERRORS WILL CAUSE A HALT. 
19 ‘7431 THE PROGRAM CHECKS TO SEE THAT THE P.C. DOESN'T JUMP 
20 WITHIN THE TESTS, BY A SEQUENCE COUNT CALLED ‘$TSTN' 
4 THIS TEST IS A SEQUENCIAL INCREMENT AND COMPARE COUNT. 
i cme 
25 TSTA: INC $TSTNM : INCREMENT THE TEST NUMBER 
26 CMP #A,$TSTNM “COMPARE FOR THE RIGHT TEST 
37 = BNE TSTA+1-12 “IF NOT CORRECT BRANCH TO A HALT 

«x ® 
$3 BEQ 1000$ sBRANCH AROUND JUMP IF OK 
4 10008 JMP TSTAt1-12 : JUMP (USED FOR LONG TESTS THE BRANCH CAN'T REACH) 
32 mon 
3 CODE 
34 
35 

IMPORTANT 


IOI IOUS i ion ititott 
IF AN ERROR IS DETECTED ;IT COULD BE BECAUSE OF THREE REASONS. 
A) WRONG TEST NUMBER 


B) ERROR IN THE PRESENT TEST. 
C) POWER MONITOR BIT PROBLEM. 


UU 
THE TEST SEQUENCE LOCATION ‘'TESTN'’ SHOULD BE CHECKED FIRST 
TO SEE IF IT MATCHES THE PRESENT TEST. 
IF IT DOESN'T MATCH ; THEN THE CONTENTS OF THIS LOCATION 
TELL YOU WHICH TEST IT WAS DOING BEFORE IT ° 
SITTTTTTTAATAT ALATA LTA TTT SA 
6.2 ° ERROR RECOVERY 
ON TRAP ERRORS ~ RESTART AT STARTING ADDRESS 
POWER MONITOR ERRORS - FIND OUT WHAT POWER SUPPLY PROBLEM (OR CPU 


ON 
ERROR REGISTER PROBLEM) THERE IS AND OBTAIN REPAIR BEFORE RERUNNING 
THIS DIAGNOSTIC 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 9 SEQUENCE 8 
159 7. RESTRICTIONS 
1e1 7.1 STARTING RESTRICTION 
163 NONE 
168 7.2 OPERATIONAL RESTRICTION 
167 NONE 
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8. MISCELLANEOUS 
8.1 EXECUTION TIME 
1ST PASS APPROX. 2 SEC., THEREAFTER EVERY 15 SEC 
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SEQUENCE 
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9. PROGRAM DESCRIPTION 


S PROGRAM CHECKS THAT er ALL TRAP OPERATIONS REGISTER 
e. 13 DECREMENTED THE CORRECT? THAT THE CORRECT 
C 1S SAVED ON THE STACK, STACK OLD pe he CODES AND 


E 
p K AND THAT THE NEW STATUS AND 
CONDITION CODES ARE CORR BOTH THE "TRAP" AND UEMT 
TRAP INSTRUCTIONS ARE TESTED TO SEE THAT ALL COMBINATIONS WILL 
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E CKE IT _CAU TRAP. 
AND RTT INSTRUCTIONS ARE CHECKED. STACK OVERFLOW IS 
ALSO CHECKED FOR ALL THE TRAP INSTRUCTIONS. 
SPECIAL CHECKS ARE MADE TO SEE IF BUS 
ca vay 9 eee ON NON-EXISTENT MEMORY.PIRQ TRAPS ARE CHECKED 
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19 10.0 RUNNING UNDER APT 
136 THE EXECUTION TIMES PROVIDED IN THE APT SCRIPT THAT FOLLOWS 
19 ARE FOR EXECUTION WITH A 11/44 PROCESSOR, CACHE, 
194 16K CORE MEMORY, AND 300 BAUD. 
195 THE FOLLOWING IS A PROGRAM LOAD FILE USED BY APT: 
138 1. — TABLE ‘A’ IS USED FOR APT DUMP MODE. 
198 2. E TABLE 'B' IS USED FOR APT QV AND RUN TIME MODES. 
+4 SENVM=040 INDICATES THAT TYPEOUTS WILL BE SUPRESSED. 
201 
soe 1ST PASS LONGEST ADDITIONAL 
20 RUN TIME TEST TIME RUN TIME 
204 5 5 0 
Soe 
06 
Ee ee in 2 aie E TABLES cc ccs 
208 
209 
210 A B 
211 E-~MODE/S-MODE 000/000 040/001 
si¢ (SENVM/$ENV) 
214 SWITCH REGISTER 1 VUUULU 000000 
siz ($SWREG) 
217 SWITCH REGISTER 2 000000 000000 
218 CPU TYPE/OPTIONS 00/0000 00/0000 


| & 
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219 11.0 REVISION HISTORY 
2 1 REVISION DATE COMMENT 
; CKKABA MARCH 1979 ORIGINAL RELEASE 
4 CKKABB NOVEMBER 1980 FIX DIAGNOSTIC HALT WITH CIS SWITCH IN 
7 THE MAINTENANCE POSITION 
6 CKKABC APRIL 1981 INCLUSION OF CPU ERROR REGISTER BIT 0 
CHECKING BEFORE EACH TEST 
28 CKKABD OCTOBER 1981 CHECKING THAT WITH PIRO AND UNIBUS 
3 INTERRUPTS PENDING, UNIBUS SERVICE 1S 
231 % 


— 
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CKKABDO 11/44 TRAPS MACRO 1113 11-NOV-81 10:05 PAGE 14 SEQUENCE 
23 .TITLE CKKABDO 11/44 TRAPS 
52 TALL INSTRUCTIONS THAT ARE RESERVED 
359 ‘SHOULD TRAP TO LOCATION 10, AND THE 
330 -PC THAT POINTS TO THE TRAPPING INSTRUCTION 
351 ‘SHOULD BE PLACED ON THE STACK 
332 <P ISTING 
3 IST ME 
33, NLIST MC 
335 NEIST 
3 -NLIST CND 
337 000000 “ENABLE ABS 
338 “ENABLE AMA 
39 000000 RO =%0 
$40 900001 RI =a] 
000001 TAST =k 
542 000002 R2 =%2 
3 000003 RS =%3 
44 000003 TAR =X3 
4 000004 RG =44 
é 000005 Re =45 
347 90000 FIRST =4%5 
348 000006 Rb =%6 
349 000006 SP =%6 
350 000007 a7 =47 
31 000007 PC =47 
$52 000000 HLT=HALT 
35 000003 . 
354 000004 RTRAPS=4 SILLEGAL ADDRESSES 
$22 000014 RTRAP4=146 :FOR TRACE TRAP 
56 000030 RTRAP3=30 “FOR EMULATOR TRAP 
55 000020 RTRAP2=20 “FOR [OT TRAP 
58 000034 TRAP1=34 sFOR TRAP INST 
39 177564 TTCSR=177564 
60 17756 TRCSR=177560 
i 177864 TPS=177564 
é 177566 TPB=177566 
36 000240 BELL=240 
64 00094 NOP=240 
65 177776 STATUS=177776 
66 000010 RAPA 
Ht ete RT Az004700 
9 099100 ILLB=10 
0 177776 C¢=1777 
a 177766 CPUERR=177766 
37 179413 CERMSK=177618 
’ 177776 Su=17 


PSW=177776 
374 -MCALL .S$APTHDR,.$APTBLS,.$ACT11 


ET TT TT TT 
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382 000000 000002 .WORD .#2 :ADDRESS OF NEXT LOCATION 
000002 000000 HALT “IF HALTED H TRAPPED | TO PREVIOUS ADDRESS 
000004 000006 WORD .+2 ;ADDRESS OF ext | 
000006 000000 HALT HALTED TRAPPED TO PREVIOUS ADDRESS 
000010 000012 .WORD .+2 “ADDRESS OF NEXT LO 
000012 000000 HALT :1F HALTED HERE, LAPPED TO PREVIOUS ADDRESS 
000014 000016 .WORD .+2 SADDRESS OF NEXi o 
000016 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
900020 000022 .WORD .+2 “ADDRESS OF NEXT LOCATI 
900022 000000 HALT : LTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000024 000026 .WORD +2 “ADDRESS OF NEXT LOCATION 
000026 900000 HALT “IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000030 000032 .WORD .+2 “ADDRESS OF NEXT LOCATION 
900052 000000 HALT : LTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000034 000036 ‘ +2 “ADDRESS OF NEXT LOCATI 
000036 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000040 000042 .WORD .#2 “ADDRESS OF NEXT LOCATI 
000042 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000044 000046 .WORD .+42 “ADDRESS OF NEXT LOCATI 
000046 000000 HALT "IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000050 000052 .WORD .+#2 “ADDRESS OF NEXT LOCATI 
000052 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000054 006056 .WORD .#2 SADDRESS OF NEXT LOCATION 
000056 000000 HALT F HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000060 000062 .WORD  .#2 “ADDRESS OF NEXT LOCATI 
000062 000000 HALT ‘IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000064 000066 .WORD .+2 “ADDRESS OF NEXT LOCATI 
000066 000000 HALT ‘IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000070 000072 .WORD .+2 “ADDRESS OF NEXT LOCATION 
000072 000000 HALT “IF HALTED , TRAPPED TO PREVIOUS ADDRESS 
000074 000076 F +2 ‘ADDRESS OF NEXT LOCATION 
000076 000000 HALT ‘IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000100 000102 : +2 “ADDRESS OF NEXT LOCATI 
000102 000000 HALT [IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000104 000106 : +2 SADDRESS OF NEXT LOCATI 
000106 HALT F HALTED TRAPPED TO PREVIOUS ADDRESS 
000110 000112 .WORD +2 [ADDRESS OF NEXT LOCATION 
000112 000000 HALT ‘JF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000114 000116 .WORD +2 “ADDRESS OF LOCA 
000116 000000 HALT “IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000120 000122 .WORD #2 -ADDRESS OF Next L 
000122 000000 HALT 7 IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000124 000126 WORD .+#2 “ADDRESS OF Next LOCATION 
000126 900000 HALT ‘IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000130 00013 .WORD  .#2 “ADDRESS OF ext LOCAT 
000132 000000 HALT “IF HALTED HER TRAPPED TO PREVIOUS ADDRESS 

134 000136 .WORD .+2 “ADDRESS OF NEXT LOCA 

000136 000000 HALT “IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000140 000142 .WORD .42 “ADDRESS OF NEXT LOCATION 
000142 000000 HALT ‘IF HALTE TRAPPED TO PREVIOUS ADDRESS 
000144 146 .WORD .+#2 “ADDRESS OF NeXt LOCAT 
000146 HALT *IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000150 000152 .WORD .+#2 “ADDRESS OF NEXT LOCAT 
000152 000000 HALT “IF HALTED HER TRAPPED TO PREVIOUS ADDRESS 
000154 000156 .WORD .+2 “ADDRESS OF NeXt LOCAT 
000156 000000 HALT “IF HALTE TRAPPED TO PREVIOUS ADDRESS 
000160 000162 ,WORD +2 “ADDRESS OF rext LOCATION 


ee 
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000000 
000166 
000000 
000172 
000000 
000176 
000000 
000202 
000000 
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HALT 
WORD 
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.+2 


rr | ee ee 


2 


:1F HALTED HERE TRAPPED | TO PREVIOUS 
=ADDRESS OF Next LOC 


‘IF HALTED H TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LO LOC 
TED H TRAPPED TO PREVIOUS 
TED 


*IF HAL 
“ADDRESS OF WNEXt LOC 
TRAPPED TO PREVIOUS 


‘IF HALTED H 
ADDRESS OF NEXT LOCATI 
LTED HERE, TRAPPED TO PREVIOUS 
; ADDRESS OF NEXT LOCATI 
HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
: TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATION 
-IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
-IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATION 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATION 
F HALT TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
-IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATION 
‘IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
-iF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
‘IF HALTED HERE, TRAPPED TO PREY!OUS 
“ADDRESS OF NEXT LOCATION 
*JF HALTED HERE, TRAPPED TO PREVIOUS 
SADDRESS OF NEXT LOCATION 
F HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
‘IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
T E, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
LTED H TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATION 
“IF HALTED HERE, TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOCATI 
“IF HALTED HERE « TRAPPED TO PREVIOUS 
“ADDRESS OF NEXT LOC 
“IF HALTED HERE, TRAPPED TO PREVIOUS 


SEQUENCE 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 15-2 SEQUENCE 16 
000344 000346 .WORD +2 sADDRESS OF NEXT LOCATION 
000346 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000350 000352 .WORD .+2 “ADDRESS OF NEXT LOCATION 
000352 HALT “IF HALTED H TRAPPED TO PREVIOUS ADDRE 
000354 000356 .WORD .+2 _ SADDRESS OF NEXT LOC 
000356 000000 HALT = IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000 000362 WORD .+2 ‘ADDRESS OF NEXT L 
00036¢ 000000 HALT “IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000 000366 .WORD .+2 “ADDRESS OF NEXT LOCA 
000366 000000 HALT ;1F HALTED HERE, SOC PPED TO PREVIOUS ADDRESS 
000370 000372 .WORD .+2 ADDRESS OF NEXT LOCATI 
000372 00000 HALT TF HALTED H TRAPPED TO PREVIOUS ADDRESS 
000374 000376 .WORD .+2 =ADDRESS OF Wont 16 
000376 000000 HALT >IF HALTED HERE, LOMPPED TO PREVIOUS ADDRESS 


a ee ee 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 16 SEQUENCE 17 
385 000200 -=200 
386 000200 000137 000510 JMP BEGIN 
387 000210 =21 
388 000210 005037 000306 CLR $SPASS 
389 000214 000137 000510 JMP BEGIN 
390 000300 .=300 
391 -SBTTL ACT11 HOOKS 


EEE EEE EE EEE EKEEEREREREEREEEEEEEKEREEEEEEAEEAREE EEE 


“HOOKS REQUIRED BY ACT11 
$SVPC=. 


900300 s :SAVE PC 
000046 023550 SENDAD ::1)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP 
000052 800006 “WORD 0 ::2)SET LOC.52 TO ZERO 

000300 -=$SVPC *: RESTORE PC 


oo ee ee 6 ee = ee + ee a ee 
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CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 17 SEQUENCE 
APT MAILBOX-E TABLE 
393 _SBTTL APT MAILBOX-ETABLE 

errr ri titiiitttt iit iitit iii iii 
“EVEN 

000 SMAIL: MAILBOX 

000 000000 SMSGTY: .WORD AMSGTY : MESSAGE TYPE CODE 

000302 900000 SFATAL: .WORD AFATAL :;FATAL ERROR NUMBER 

000304 STESTN: .WORD ATESTN :;TEST 

000 000000 SPASS: .WORD APASS ;:PASS COUNT 

000310 000000 S$DEVCT: .WORD ADEVCT ; :DEVICE COUNT 

000312 000000 SUNI "WORD AUNIT ::1/0 UNIT NUMBER 

000314 000000 $MS -WORD  AMSGAD «MESSAGE ADDRESS 

000316 000000 SMSGLG: .WORD AMSGLG :;MESSAGE LENGTH 

32 SETABLE ::APT ENVIRONMENT TABLE 

900320 000 SENV: .BYTE AENV ;;ENVIRONMENT BYT 

000321 SEN YTE AENVM ::ENVIRONMENT MODE BITS 

000322 000000 SSWREG: .WORD ASWREG ::APT SWITCH REGISTER 

000324 000000 SUSWR: .WORD AUSWR ::USER SWITCHES 

000326 000000 $CPUOP: .WORD  ACPUOP iicPU TY if OPTIONS 
:* “l= 
;* 1/04=01, A cay E 11/20=03,11/40=04,11/45=05 
:* 11770206-P =07,0=10 
3* BIT 10=REAL TIME CLoc 
zs BIT 9=FLOATING POINT PROCESSOR 
+ BIT 8=MEMORY MANAGE 

000330 SETEND: 
_MEXIT 


OO ao 








CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 18 SEQUENCE 19 
APT PARAMETER BLOCK 
395 .SBTTL APT PARAMETER BLOCK 


eee RERERRREERAR ARR ERAREERERARERARAAR ERA AK EKER RETR eee ee 


>SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


SRRRE EERE RRA ARE R EEE ERE ERE EE Eee 


000330 -$X=.  ;;SAVE CURRENT LOCATION 

000024 .=24 7 eSET POWER FAIL TO POINT TO START OF PROGRAM 
000024 2 206 3zFOR APT START 

000044 .=44 ; POINT TO APT INDIRECT ADDRESS PNTR. 
000044 000330 SAPTHDR ::POINT TO APT HEADER BLOCK 

000330 =. 5X : ERESET LOCATION COUNT 


Se I ID AACA ICI IISII IOI IIIT TI TTT TOT TTT TTT TTT TTT TE 
:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
j INTERFACE SPEC. 


000330 000000 $HIBTS: .WORD 0 :;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

000332 000300 SMBADR: .WORD $MAIL : sADDRESS OF APT MAILBOX (BITS 0-15) 

000334 000005 STSTM: .WORD N TIM OF LONGEST TEST 

000336 000005 SPASTM: : ERUN 3 IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 


5 
-WORD 5 
000340 000000 SUNITM: .WORD 0 sADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
000342 000014 . WORD SETEND~SMAIL/2 3;LENGTH MAILBOX-E TABLE (WORDS) 





CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 19 
APT PARAMETER BLOCK ——— 
397 000304 STSTNM=$TESTN 
$05 000302 SERROR=$FATAL 
400 000500 .=500 
401 000500 FF: WORD 0 
mh 000502 000000 RCPUER: .WORD 0 
403 000504 000250 KTVEC: .WORD 250 
404 000506 000252 KTSTA: .WORD 252 


ea ee — 


1 2 


BAe 


| CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 20 SEQUENCE 21 


APT PARAMETER BLOCK 


405 000510 01 738 000500 BEGIN: MOV #500,SP :SET UP STACK POINTER 
406 000514 012737 177777 023576 MOV eh PASSPT “CLEAR THE ITERATION COUNTER 

407 000932 023737 000042 023550 CMP 2 SE ENDA “SEE IF TITLE MESSAGE SHOULD BE PRINTED 
408 000530 001403 BEQ acer “BRANCH AR MESSAGE PRINTING IF SO 
409 000532 004737 024216 JSR PC, PRIMSG “GO PRINT MESSAGE USING 

419 000536 024006 “WORD TITLE iOTARTING ADDRESS OF THIS MESSAGE 

411 000540 005037 000300 RESTRT: CLR GTY 

412 000544 012706 000500 MOV #500,R6 

413 000550 012737 024132 000024 MOV #PWRDWN, 24 :SET UP THE POWER DOWN VECTOR 

414 000556 012737 000340 000026 MOV #340, 26 “SET UP POWER DOWN PRIORI T Y 

415 000564 012737 000004 MOV #6,4 “SET UP TRAP VECTORS 4 & 6. 

416 000572 005037 000006 CLR 

417 000576 012737 000012 000010 MOV #12,10 

418 000604 005037 000012 CLR 12 

419 000610 005037 000304 CLR $TSTNM 

420 000614 005037 000302 CLR SERROR 

421 000620 012702 000300 MOV #SMSGTY,R2 

422 000624 000412 BR TST1 


A TV —— = — 


J 2 
CKKABDO 11/44 TRAPS MACRO M1113 11-NOV~-81 10:05 PAGE 21 SEQUENCE 22 
APT PARAMETER BLOCK 


423 sSPECIAL CASE OF ODD;.EVEN .BYTE AND REGISTER 6 
age 000000 HERE=0 

426 000626 000000 K1: WORD 0 

427 900630 000000 K2: WORD 0 

428 32 000000 K3: WORD 0 

623 000634 000000 K4: WORD 0 &. 
430 000636 000000 K5: WORD 0 

431 000640 K6: WORD 0 

432 000642 052525 K7: WORD 052525 

433 000644 2400 K10 .WORD 052400 

434 000646 00 K11: WORD 0 

435 000650 000000 K12: WORD 0 


-——:--- --- oo - 


— CKKABDO 11/44 





457 
458 091052 


TRAPS 
~ TEST AUTO INC 


005006 


MACRO M1113 


000001 
000177 


000001 
000304 
000001 
001220 
000000 
000002 
000001 


001000 
000000 
000776 


000002 


000004 
000003 


000002 
000004 


177766 
000302 


177766 


000304 


000302 


000302 


000302 


000302 


11-NOV-81 10:05 PAGE 22 
AND DEC OF R6 FOR WORD AND BYTES 


SEQUENCE 


.SBTTL TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


FARE E REAR ARA ER EE AEE E REET A AEA AA ER ERA RARER AERA E AREER ARR EE ARERR ATER AES 


:TEST 1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


eee AeA A ARERR ATTA A EATER AEA R AEA ATTA R AERA RATA eee 


TST1: 


100$: 


1000$: 


1$: 


2$: 


3$: 


4$: 


#1,CPUERR 
100$ 

#177, $FATAL 
(R2) 

erect nS aaa 
#1 STESTN 


1000$ 
1eroe12 


R6 
(R6) +, HERE 
R6,42 


#1, $FATAL 


(R2) 


#1000,R6 
wiRO) #HERE 
ROM #776 


#2 SFATAL 


(R2) 


R6 
(R6)+, (R6)+ 
R6,44 


#3 $F ATAL 


(R2) 


R6 

R4 

(R6)+, (RG) + 
R6,42 


4$ 
#4, SFATAL 


(R2) 


R6 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF CLEAR 

sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

;SET MSGTYP TO FATAL ERROR 

:CPU POWER BIT FOUND SET 


;UPDA 

: SEQUENCE ERROR? 

;BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


:SIX SHOULD INCREMENT BY TWO 


gkancaeanee 


sMOVE TO MAILBOX # ‘*#eaea% 7 
:SET MSGTYP TO FATAL ERROR 

*R6 DI IN aot cat BY TWO 
:TO SCOPE REPLACE HALT WITH 240 

* AND REPLACE NEXT INST WITH 764 


;SHOULD DECREMENT BY TWO 


akaaaae 2 thane 


sMOVE TO oie e 
7 SET MSGTYP TO FATAL ERROR 

;R6 DID NOT AUTO DECREMENT BY 2 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 750 


;DOUBLES AUTO INCREMENT OF R6 


geeaneane 


:MOVE TO MAILBOX # eeeanee 3 
io MSGTYP TO FATAL ERROR 


TEST INCREMENT OF R6 


greeraganne 


sMOVE TO MAILBOX # seeaeee & 
>SET MSGTYP TO Sah ERROR 
; WRONG INCREMENT OF R6 

;TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 723 


23 


a = 


CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 22-1 SEQUENCE 
TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 
459 001054 095006 CLR R4 
460 001056 122426 CMPB s« (RG) +, (RO) + : TEST INCREMENT OF R6 
61 001060 020627 000002 CMP R6,A2 
2 001064 001405 BEQ 
001066 012737 000005 000302 MOV #5. SFATAL :MOVE TO MAILBOX # *teeeee 5 seeneee 
001074 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001076 000000 HALT : WRONG INCREMENT OF R6 
*TO SCOPE REPLACE HALT WITH 240 
is ‘AND REPLACE NEXT INST WITH 710 
464 001100 005006 5$: CLR R6 
465 001102 005004 CLR R4 
466 001104 122624 CMPB —s_: (R66) +, (RG) + :TEST INCREMENT OF R4 
467 001106 020427 000001 CMP R4A1 
468 001112 001405 BEQ 6$ 
001114 012737 000006 000302 MOV #6, SFATAL :MOVE TO MAILBOX # tees 6 seneene 
001122 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001124 000000 HALT “WRONG INCREMENT OF R4 
>TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 675 
470 001126 005006 6$: CLR R6 
471 001130 005004 CLR R4 
472 001132 122426 CMPB  —s-_: (RG) +, (RO) + :TEST INCREMENT OF R6 
473 001134 020627 000002 CMP R6,42 
474 001140 001405 BEQ 
001142 012737 000007 000302 MOV #7. $FATAL :MOVE TO MAILBOX # seeenee 7 seeeeee 
001150 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001152 000000 HALT “WRONG INCREMENT OF R6 
“TO SCOPE REPLACE HALT WITH 240 
a “AND REPLACE NEXT INST WITH 662 
476 001154 005006 7$: CLR R6 
477 001156 005004 CLR R4 
478 001160 122426 CMPB—s-« (RG) +, (RO) + = TEST INCREMENT OF R4 
479 001162 020427 000001 CMP R61 
480 001166 001405 BEQ 
001170 012737 000010 000302 MOV #10,$FATAL -MOVE TO MAILBOX # teeenee 10 eeeenee 
001176 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001200 000000 HALT ; WRONG INCREMENT OF R4 
-TO SCOPE REPLACE HALT WITH 240 
se “AND REPLACE NEXT INST WITH 647 
482 001202 012706 001000 8$: MOV #1000,R6 
483 001206 124627 000000 CMPB  =(R6).#HERE : TEST DECREMENT OF R6 
484 00121 022706 000776 CMP #776, R6 
485 001216 001405 BEO TST 
001220 012737 000011 000302 MOV #11. SFATAL :MOVE TO MAILBOX # eeeenee 1] teneeee 
001226 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
001230 000000 HALT WRONG DECREMENT OF R6.0R WRONG STSTNM 


:TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 633 


ee ee er ee 


-- ome ae At ata ete LL LC CC LLG LL LL LLL LLL LLL LLL LLL LLL LL LLL LL LLL LLL 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 25 SEQUENCE 25 
TEST #2 = TEST TRANSFER OF .BYTE USING R6 
486 .SBTTL TEST #2 - TEST TRANSFER OF .BYTE USING R6 


SESE AEAAAAAEARAEAAEARAEAEAEAAAAAEAEEAAAAAAAAEEREKAKAHRAEKAKTAHKAEHAAAAAA AAA 


“TEST 2 = TEST TRANSFER OF .BYTE USING R6 


FRAAAA ARATE AAAAAAAEAAAAAE EAHA AAA KAEKAERRAKAR HARE KRHA AAA AAA TATA AAAS 


901232 032737 000001 177766 TST2: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
001240 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
001242 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
001250 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001252 000000 HALT = CPU RB 
001254 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
001262 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
001266 022737 000002 000304 CMP #2. $TESTN = SEQUENCE ERROR? 
001274 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
001276 000137 001600 oie JMP TST3-12 “JUMP TO ERROR HALT ON SEQ ERROR 
487 001302 012737 123456 000636 MOV #123456,K5 
488 001310 012737 050505 000626 MOV #050505.k1 
489 001316 012705 000626 MOV #K1R5 =R5=(050505)K1 
490 001322 012706 600636 MOV #K5 RO *R6=(1234656)K5 
491 Ot aes A166 MOVB (R6)+,(R5)+ :LOW .BYTE OF R6 TO RS 
492 001330 022737 050456 000626 CMP #050456,k1 
493 001336 001405 BEQ 1$ 
001340 012737 000012 000302 MOV #12, $FATAL sMOVE TO MAILBOX # *#eeeee 12 seeneee 
001346 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001350 000000 HALT “FALSE TRANSFER OF 
“TO SCOPE REPLACE HALT WITH 240 
_ ‘AND REPLACE NEXT INST WITH 753 
495 001352 012737 123456 000636 1S: MOV #123456,K5 
496 001360 012737 050505 000626 MOV #050505,k1 
497 001366 012705 000626 MOV #K1 RS :R5(050505)K1 
498 001372 012706 000640 MOV #K6,R6 *R6(123456)K5 
499 001376 114625 MOVB  <-(R6),(R5)+ “LOW .BYTE OF R6 TO RS (DECREMENT) 
500 001400 023727 000626 050456 CMP K1,4050456 
501 001406 001405 BEO 
001410 012737 000013 000302 MOV #13, S$FATAL :MOVE TO MAILBOX # seeeeee 13 seneeee 
001416 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001420 90900000 HALT *FALSE R6 .BYTE TRANSFER 
-TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 727 
503 001422 012737 123456 000626 2S: MOV #123456,K1 
504 001430 012737 050505 000636 MOV #050505 ,k5 
505 001436 012705 000626 MOV #K1RS + (123456) 
506 001442 012706 000636 MOV #K5R6 = (050505) 
507 001446 112526 MOVB  (R5)+,(R6)+ “LOW OF RS TO LOW OF R6 
508 001450 022737 050456 600636 CMP #050456,K5 
509 001456 001405 BEQ 3$ 
001460 012737 000014 000302 MOV #14, $FATAL -MOVE TO MAILBOX # teenxee 14 tennene 
001466 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
001470 000000 HALT “FALSE R6 .BYTE TRANSFER 
“TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 703 
511 001472 012737 123456 000626 3: MOV #123456,K1 
512 001500 012737 050505 000636 MOV #050505,K5 
513 001506 012705 000627 MOV #k1+1,R5 =123456 


—— ee mee —_——-~— + 


TEST #2 - 


ABDQ 11/44 TRAPS | MACRO MITI3, 11-NOV-81 10:05 
TEST TRANSFER OF .BYTE USING R6 
514 001512 012706 000636 MOV 
515 001516 112526 MOVB 
516 001520 023727 000636 050647 CMP 
517 001526 001405 BEQ 
001530 012737 000015 000302 MOV 
001536 00521 INC 
001540 000000 HALT 
518 
519 001542 012737 123456 000626 4$: = MOV 
520 001550 012737 050505 000636 MOV 
§21 001556 012705 000627 MOV 
522 001562 012706 000636 MOV 
523 001°44 9112625 MOVB 
524 0015/0 022737 042456 000626 CMP 
525 001576 001405 BEQ 
001600 012737 000016 000302 MOV 
001606 005212 INC 
001610 000000 HALT 


ec i te A CC LE LLL LE LLL LLL LE 


PAGE 23-1 


wags (R6)+ 
K5,4050647 


#15, $FATAL 
(R25 


#123456 9-K 
#050508 
oe os i 


nase (R5)+ 
#042656,k1 


TST 
#16,$FATAL 
(R2) 


;050505 


sHIGH OF RS TO LOW OF R6 


MOVE TO MAIL 


aaa kKEE 


;R5-123456-ODD ADDRESS 
:R6-050505--. EVEN ADDRESS 
:LOW OF R6 TO HIGH OF R5 


:MOVE TO MAILBO 
;SET MSGTYP TO FATAL ERROR 
HIGH OF 3 oR WRONG $TSTNM 


:FAILED LOW 


OF 


xX # 


Ka&akKKKE 


6 T0 
:TO SCOPE REPLACE HALT WITH 


sAND REPLACE NEXT INST WITH 633 


———— ieee 


15 


16 


eeaeneene 


keancaane 


SEQUENCE 


26 


ae eee ll” —— - - . - — — 





CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 24 SEQUENCE 
TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 
526 _SBITL TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 
SEERA AAA AE AARA ERE TEAR AERA AREER E REAR A RARER ERERERAAERERRERERE RARE EES 
“TEST 3 - TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 
PPOPPeerr Tree TTe TTT TT TITTLE LLL LLL LLL LLL 
001612 032737 000001 177766 isT3: BIT " CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
001620 001410 BEQ 7 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
0016 01273 000177 000302 MOV “| .. SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
001630 005212 INC “SET MSGTYP TO FATAL ERROR 
0016 000000 HALT “CPU POWER BIT FOUND S$ 
001634 042737 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
001642 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
001646 022737 000003 000304 CMP #3. $TESIN “SEQUENCE ERROR? 
001654 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
001656 000137 002070 _— JMP TST4-12 * JUMP TO ERROR HALT ON SEQ ERROR 
527 001662 123737 000642 000643 CMPB sé, K7+1 :SAME .WORD LOW TC HIGH 
528 001670 001405 BEQ 
001672 012737 000017 000302 MOV #17, S$FATAL :MOVE TO MAILBOX # ‘*eeeaae 17 seeeeee 
001700 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
001702 000000 HALT D COMPARE LOW TO HIGH 
*TO SCOPE REPLACE HALT WITH 240 
529 “AND REPLACE NEXT INST WITH 766 
530 001704 123737 000643 000642 S$: CMPB sd 7+1,K?7 :COMPARE ODD TO .EVEN SAME .WORD 
531 001712 001405 BEQ 
001714 012737 000020 000302 MOV #20, $FATAL :MOVE TO MAILBOX # *eexxee 20 tenner 
001722 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
001724 000000 HALT “ODD TO .EVEN .BYTE FAILURE 
:TO SCOPE REPLACE HALT WITH 240 
- ‘AND REPLACE NEXT INST WITH 755 
533 001726 123737 000645 000642 6$: CMPB  s«K 1041, kK? sSEQUENTIAL .BYTES 
534 001734 001405 BEQ 7 
001736 012737 000021 000302 MOV #21. SFATAL sMOVE TO MAILBOX # teeenee 2] xenenee 
001744 005212 INC (R2) *SET MSGTYP 10. FATAL ERROR 
001746 000000 HALT “ODD TO .EVEN FAILED 
:TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 744 
536 001750 123737 000644 000640 7%: CMPBs«dK 10, K6 
537 001756 001405 BEQ 
001760 012737 000022 000302 MOV #22, $FATAL :MOVE TO MAILBOX # ‘*eeenee 22 xeneees 
001766 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
001770 0 HALT > EVEN TO EVEN FAILED 
*T0 SC LACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 733 
538 001772 123737 000643 000645 8$: CMPB sdk 7#1,K10+1 
539 002000 001405 BEQ 
002002 012737 000023 000302 MOV #23, SFATAL :MOVE TO MAILBOX # seeeeee 23 eeeenee 
002010 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002012 000000 HALT [ODD TO ODD FAILED 
‘TO SCOPE REPLACE HALT WITH 240 
= “AND REPLACE NEXT INST WITH 722 
541 002014 123737 000644 000645 9S: CMPBs«dK10,K10+1 
542 002022 001005 BNE 
002024 012737 000024 000302 MOV #24, $FATAL :MOVE TO MAILBOX # *eeexee 24 exenene 





CKKABDO 11/44 TRAPS 


Meee 
002034 


MACRO M1113 


000645 
000025 


000644 
000026 


090645 
000302 


000643 
000302 


10$: 


11$: 


INC 
HALT 


MAC 11-NOV-81 10:05 PAGE 24-1 
TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


(R2) 


K10+1,K10+1 


#25, $FATAL 
(R2) 


K10,K7+1 
TST4 


#26, $FATAL 
(R2) 


3 


me eee a 


SEQUENCE 


: SET MSGTYP TO FATAL ee 

;LOW TO HIGH IN S$ . WORD aihee 
‘TO SCOPE REPLACE HALT WITH 4 
SAND REPLACE NEXT INST WITH 711 


aaeaaanee 


sMOVE TO MAILBOX # “SnROR 25 
a ee oe t on oe ERR 


TO LOW IN SAME 
TO SCOPE REPLACE HALT MUITH 260 
:AND REPLACE NEXT INST WITH 


RRR 


TSTNM 


sMOVE TO MAILBOX # *xeexee 26 
; SET MSGTYP a ani es E 


; EVEN 
:TO SCOPE 
SAND REPLACE NEXT INST WITH 667 


EE OS CE ee -— 


28 





dD 3 


| CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 25 SEQUENCE 
TEST #4 TES! THE CC BITS 
| 549 _SBITL TEST #4 - TEST THE CC BITS 
i 5 RRR AEAR AREER EERE TEE EERE REA EEAREERE RARER ERREREE REA ERAEE TERRE REARS 
| “TEST 4 - TEST THE CC BITS 
| SReRARERRRARERA REAR AT ATA A AAA TAREE AERA A TAKARA AAA A AKT e eee eee A Tee e eee 
902102 032737 000001 177766 TST4: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
002110 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
00211 012757 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
002120 005212 INC (R2) :SET MSGTYP fo FATAL ERROR 
0021 HALT : R BIT F 
002124 042737 1 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
002132 005237 000304 100$: INC $TESTN “UPDATE TEST 
002136 022737 000004 000304 CMP Wh STESIN = SEQUENCE ERROR? 
002144 001062 BNE ST5-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
$50 002146 000277 SCC “SET STATUS 
51 002150 005037 177776 CLR STATUS “CLEAR STATUS 
552 002154 103005 BCC 
002156 012737 000027 000302 MOV #27, $FATAL :MOVE TO MAILBOX # tteeaen 27 xeeneee 
002164 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
002166 000000 HALT *C NOT CLEAR 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 766 
553 002170 1$: 
002170 102005 BVC 2$ 
002172 012737 000030 000302 MOV #30, $FATAL :MOVE TO MAILBOX # *#eexee 30 eeeeeee 
2200 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
002202 000000 HALT V NOT CLEAR 
‘To SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 760 
554 002204 2$: 
002 04 001005 BNE 3$ 
02206 012737 000031 000302 MOV #31, $FATAL :MOVE TO MAILBOX # teereee 3] xeneees 
002214 005212 INC (R2) “SET MSGTYP TO FATAL ERRO® 
002216 000000 HALT -Z2 NOT CLEAR 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 752 
555 002220 3$: 
002220 100005 BPL 4$ 
002 @2 012737 000032 000302 MOV #32, $FATAL sMOVE TO MAILBOX # ‘teexeee 32 seeeeee 
002230 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
002232 000000 HALT N NOT CLEAR 
‘To SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 744 
556 002234 000257 4$: CCC “CLEAR CONDITION CODES 
337 002236 052737 000017 177776 BIS #17,STATUS *SET STATUS TO ONES 
559 002244 103405 BCS 5$ 
002246 012737 000033 000302 MOV #33, SFATAL *MOVE TO MAILBOX # teeexee 33 eeeeene 
002294 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
002256 000000 HALT *C NOT SET 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 732 
560 002260 5$: 
60 102405 BVS 6$ 
62 012737 000034 000302 MOV #34, $FATAL :MOVE TO MAILBOX # *eeeex« aeeeene 
0 0052172 INC (R25 :SET MSGTYP TO FATAL ERROR 
002272 $0008 HALT T SET 
‘To SCOPE REPLACE HALT WITH 240 


29 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 25-1 
TEST #4 = TEST THE CC BITS 


561 002274 6S: 
74 001405 BEQ 7$ 
76 012737 000035 000302 MOV #35, $FATAL 
00 005212 INC (R25 
00 000000 HALT 
562 002310 7$: 
002310 100405 BMI TST5 
00 1 012737 000036 000302 MOV #36, SFATAL 
00 32 005212 INC (R2) 
002322 000000 HALT 


zAND REPLACE NEXT INST WITH 724 


:MOVE TO MAILBOX # seeeeee 35 


: + a ge hg TO FATAL ERROR 


:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 716 


sMOVE TO MAILBOX # *eanene 36 
7 SET ae hay TO FATAL ERROR 
T,OR WRONG $STSTNM 


ZN 
;TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 710 


SEQUENCE 


eaeeaene 


eeaeaeee 


30 


em ee ee 


CKK 11/44_ TRAPS 





MACRO M1113. 11-NOV-81 10:05 PAGE 26 


ee eae ee eee ~~ oe 


3 
SEQUENCE 31 


TEST #5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 


563 ~SBTTL TEST #5 = TEST THAT A 


TRAP OCCURS ON A RESERVED INS 


saree sees sececcsnecenceteccencacscsacnceccaccnescecceneneececenceceueeee 


:TEST 5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 


1 eee ee eee erate eee eet eee eee th BIT B OF CHUAL OMA FANN TOR BIT? 













4 177766 STS: iT PUERR SEE IF B17 0 OF POWER MONI TOR BIT) IS SET 
0¢ 000302 MOV i SFATAL cata CAE ‘ RMON TOR HALT IF CLEAR # TO SFATAL 
: Mey Fase R | aes 
seus en a " 
i 000304 cmp #5, $TESTN ? 
ii 1$ : RROR HALT ON SEQ ERROR 
64 0 MOV Hs FF.SP ; STACK POINT R SETUP 
5 00237 000010 MOV. #2$,RTRAP ;RETURN LOCATION 
66 r i a TRAPA “RESERVED INSTRUCTION, SHOULD TRAP 
1024 12737 000037 000302 ~~ MOV #37,$FATAL :MOVE T0 MAILBOX Wo eeennee 37 seeenee 
iC 4t2 22 INC (R25 SET Rien AL ERROR 
0241 HALT :R SERVE IN TRUET ION DIDN” T TRAP,OR WRONG $TSTNM 


568 002416 2$: 


770 § OE te E HALT WITH 240 
; AND REPLAC NEXT INST WITH 764 


7 OOo nnn _ —— + ee = 


—— eae ee eC 








G 3 
CKKABDO 11/44 TRAPS MACRO M1113 eS eat 705 a 27 SEQUENCE 


TEST #6 = TEST DEC OF STACK POINTER ON A TRAP 
569 .SBTTL TEST #6 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


sR EERE AEE RARER RA ER EAA A AREA RARER AR RARERAARERRRERERA EERE EER AE ERE ES 


:TEST 6 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SRRREEERRRERAAR AAA EAA TEA ATER AAA A AAA ATTRA A eee RATT e eee e eRe T eee eee 





002416 032737 000001 177766 TST6: BIT #1, CPUERR =SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
002424 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
002426 012737 000177 000302 MOV #177,$FATAL = ;:MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
002434 005212 INC (R2) “SSET MSGTYP TO FATAL ERROR 
002436 000000 HALT *CPU POWER BIT FOUND SET 
0024640 042737 000001 177766 BIC #1, CPUERR 
002446 005237 000304 100$: INC $TESIN 
002452 022737 000006 000304 CMP #6,$TESIN : ROR? 
002460 001011 BNE Ist 7~12 : CH TO ERROR HALT ON SEQ ERROR 

570 002462 012706 000500 MOV #BUFF ,SP “STACK POINTER SETUP 

571 002466 012737 002476 000010 MOV #1$,RTRAP “RETURN POINTER 

572 002474 000019 TRAPA “RESERVED INSTRUCTION 

573 002476 020627 000474 1$: CMP SP, ABUF F=4 “TEST DECREMENT OF SP 

574 002502 001405 BEQ 17 
002504 012737 000040 000302 MOV #60, $FATAL :MOVE TO MAILBOX # teexeee 40 seeeene 
002512 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002514 000000 HALT NOT DECREMENTED TWO WORDS.OR WRONG $TSTNM 

TO SCOPE REPLACE HALT WITH 240 


RE 
:AND REPLACE NEXT INST WITH 761 


ee ae _—- -_— 


575 
002516 
002524 
002584 
002536 
002540 
00 28 
+ 55 
560 
576 002562 
577 0025 
578 002574 
579 002576 
580 002604 
posere 
002614 
002616 


= 


CKKABDO 11/44 TRAPS 
TEST #7 = TEST THAT PROPER P.C. 


ee 


GEVIIN 


o—-Wow— 
OM nVN© 


MACRO wat | 


000001 
000177 
000001 
000304 
000007 


000500 
002576 


002576 
000041 


177766 
000302 


177766 
000304 


000010 
000474 
000302 


11-NOV-81 10:05 PAGE 28 
SAVED 


re > ee ee - —_—- 


SEQUENCE 


-SBTTL TEST #7 - TEST THAT PROPER P.C. IS SAVED 


SRE EE AREER AER ERE AEE EE EEE AERA RAEERERAERERERRERRAREERRER ERE REE AER EH EES 


=TEST 7 - TEST THAT PROPER P.C. IS SAVED 


PPOerrrTrTTTTT TTT TI TITTLE LLL LLL 


iST?: 


100$: 


1$: 





#1,CPUERR 


100$ 
#177, SFATAL 
(R2) 


#1, CPUERR 
$TESTN 

#7, $TESTN 
TST10-12 
#BUFF.SP 
#1$,RTRAP 
#1$,BUFF=4 

Ti 


#41,$FATAL 
(R2) 


+SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
;SET MSGTYP To FATAL ERROR 
:CPU POWER BIT FOUND SET 
:CLEAR THE BIT FOUND SET 
:UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 
3 STACK POINTER SETUP 
[RETURN FROM TRAP POINTER 
; TRAP ON THIS INSTRUCTION 
:CHECK FOR INCREMENTED P.C. 


sMOVE TO MAILBOX # ‘*eexan 4] 
SET MSGTYP TO FATAL ERROR 
sae e P.C.,OR WRONG $TST 

TO SCOPE REPLACE HALT WITH W240 
+ AND REPLACE NEXT INST WITH 760 


geanene 


33 


- eae ee ee ee —_«———— - nm 


' 


| CKKABDO 11/44 TRAPS 


581 


662 
582 002664 


584 S 76 
585 002702 
86 04 


4 
002726 


589 002730 
590 734 


594 754 
595 002762 
596 002764 
002772 
002774 
597 002776 
002776 
003000 
003006 
003010 


So 
wm 


S56 
VIN 
NNON 


NEN 
WINNS WSs 


SSSSSRSF 
MNnN nr uro 

eo 
Srv WA NO ~d~d ORO 


Coo°ooo°o 
Sss[sn 
Outu—Ww 


MACRO M1113 


000001 
000177 


177776 


000476 
000042 


000500 
002754 
000357 


000476 
000043 


000044 


177766 
000302 


177766 
000304 


000010 


000000 
000302 


000357 
000302 


000302 


—— ee 


11-NOV-81 10:05 PAGE 29 
TEST #10 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


SEQUENCE 


.SBTTL TEST #10 - TEST THAT ‘‘OLD'’ CC ANP PRI ARE PLACED ON STACK 


SERRE RAAERERAERE RARE EAE ATER EEEAEAEERERAAARERRERERERAAEEEAEARERA TARAS AEE 


:TEST 10 - TEST THAT ‘‘OLD'' CC AND PRI ARE PLACED ON STACK 


PPPTrTrerTTTTTTITITTITTIT TTI LLIL LLL LLL LLL LLL, 


TST10: 


100$: 


2$: 


3$: 


4$: 


Bi 


# CPUERR 
#177, $FATAL 
(R2) 


#1, CPUERR 
TESTN 

#10 STESTN 
TST11=1 


KRU F sp 
#1$.RTRAP 


BUF F-2,4#0 


$ 
#42, $FATAL 
(R2) 


FSP 
a3, RTRAP 
357,CC 


BUFF =2,#357 
#43 ,SFATAL 
(R2) 


TST11 
#44, $FATAL 
(R25 


; SEE IF BIT 0 OF CPUERR (POWER wth BIT) IS SET 
CH AROUND 


CLEAR AND HALT IF CLEAR 
:MOVE SPECIAL POWER gly FATAL # TO SFATAL 


; TE 
;SEQUENCE ERROR? 
ser UP ;BRANCH TO ERROR HALT ON SEQ ERROR 


SET UP 
;CLEAR CC AND PRICRITY 


: TRAP 
:TEST THAT OLD STATUS WENT TO STACK 


sMOVE TO MAILBOX # **eaee% 42 
;SET MSGTYP Ly FATAL ERROR 

s INCORRECT STATUS 

:TO SCOPE REPLACE HALT WITH 240 
ZAND _— NEXT INST WITH 755 


REEKEEE 


:SET UP 

;SET PRIORITY 

suv CC 

; TRAP 

:COMPARES STATUS ON Aa 


;BRANCH OVER ERROR # 
LBOX # seeanee 43 


ERROR 
RVED FOR PWR MON BIT ERROR 

‘10 SCOPE REPLACE HALT WITH 240 

:AND REPLACE NEXT INST WITH 732 


a2eeankaene 


keneeee 4 
RROR 

STACK,OR WRONG STSTNM 
C TH 240 

‘AND REPLACE NEXT INST WITH 724 


eeeegnne 


= MOV VE TO MAIL 


EO LL LOCO LL SLE CS LO 


34 


—_-ezzzzzzzzmm ai TO LE LL LE LLL LL —— ee a 


3 


J 
CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 30 SEQUENCE 
TEST #11 = TEST THAT "NEW STATUS IS CORRECT 
598 _SBITL TEST #11 - TEST THAT "NEW'’ STATUS IS CORRECT 
FERRARA AAA AEA AAAAAAE AERA EAA ERAA ERA AAAAAAAEREARRERRERARRAARER AREA RE ARES 
“TEST 11 - TEST THAT ‘'NEW’’ STATUS IS CORRECT 
PPeerrrrrr TT eer TTT TI TITT TITTLE LILLE LL LILI LLL, 
003012 032737 000001 177766 TST11: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
003020 001410 BEQ 100$ *BRANCH AROUND CLEAR AND HALT IF CLE 
00 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
00 §212 INC (R2) “SET MSGTYP TO FATAL ERROR 
00 HALT “CPU POWER BIT FOUND SET 
00 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
003042 005237 000304 100$: INC $TESIN ‘UPDATE TEST NUMBER 
003046 020737 000011 000304 CMP #11,$TESTN * SEQUENCE ERROR? 
003054 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
00 36 000137 003324 asia JMP 12$ : JUMP TO ERROR HALT ON SEQ ERROR 
599 003062 012706 000500 MOV #BUFF ,SP 
600 00 012737 003102 000010 MOV #1$,RTRAP 
601 003074 005037 000012 CLR RTRAP+2 =CLEAR FUTURE PRIORITY AND CC 
602 90 100 000010 TRAPA ran 
603 3102 1$: :TEST FOR "'C’’ CLEARED 
604 003102 100005 BPL 2$ 
003104 012737 000045 000302 MOV #45, $F ATAL sMOVE TO MAILBOX # steenee 45 seeeeee 
003112 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
003114 000000 HALT *N NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 7 
605 003116 2$: 
003116 001005 BNE 3$ 
003120 012737 000046 000302 MOV #46, $FATAL :MOVE TO MAILBOX # *eeenee 46 seeeene 
003126 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003130 000000 HALT *Z7 NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 753 
606 003132 3$: 
003132 102005 BVC 4$ 
03134 012737 000047 000302 MOV #47, $FATAL -MOVE TO MAILBOX #& *#eeeee 47 xxeeeee 
003142 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
003144 000000 HALT :¥ NOT CLEARED 
af SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 745 
607 003146 4$: 
003146 103005 BCC 5$ 
003150 012737 000050 000302 MOV #50. SFATAL sMOVE TO MAILBOX # teeeeee 50 xeenene 
003156 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
003160 000000 HALT =C NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 737 
608 003162 032737 000340 177776 SS: BIT #340,CC “TEST PRIORITY 
609 003170 001405 BEQ 
003172 012737 000051 000302 MOV #51, $FATAL :MOVE TO MAILBOX # teeeeee 5] teeeeee 
003200 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003202 00000 HALT PRIORITY NOT ZERO 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 726 
610 003204 012706 000500 6S: MOV #BUFF.SP 
611 003210 012737 003226 000010 MOV #7$,RTRAP 
612 003216 012737 000357 0600012 MOV #357, RTRAP+2  ;:SET NEW ''CC'’ AND PRIORITY 


oe ee ee ee rer 








ae ae += —_ —- _—— _ - -_—_ - one = ee ee ee — —e- —_ 


| K 3 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 30-1 SEQUENCE 36 
TEST #11 = TEST THAT "NEW'’ STATUS IS CORRECT 
613 003224 600010 TRAPA : TRAP HERE 
614 003226 7$: 
003226 100405 BMI 8$ 
0032 012737 000052 000302 MOV #52, $FATAL sMOVE TO MAILBOX # ‘*#enene 52 seanene 
003236 005212 INC (R25 ;SET MSGTYP TO FATAL ERROR 
003240 000000 HALT N NOT § 
‘To SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 707 
615 003242 8$: 
003242 001405 = BEQ 9$ 
003244 012737 00005, 000302 MOV #53, $FATAL :MOVE TO MAILBOX # teeeaee 53 eeenene 
003252 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
003254 000000 HALT NOT SET 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 701 
616 003256 9$: 
3256 102405 BvS 10$ 
003260 012737 000054 000302 MOV #54, $FATAL :MOVE TO MAILBOX # *eeenee 54 seenene 
3266 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
003270 000000 HALT V NOT SET 
‘To SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 673 
617 003272 10$: 
003272 103405 BCS 11$ 
003274 012737 000055 000302 MOV #55, $FATAL :MOVE TO MAILBOX # *#eeexe 55 sxeneee 
003302 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003304 000000 HALT =C NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 665 
618 003306 013706 177776 11$: MOV CC. SP 
619 003312 042706 000017 BIC #17.SP 
620 003316 022706 000340 CMP #340, SP 
621 003322 001405 BEO 13$ 
003324 12$: 
003324 012737 000056 000302 MOV #56,SFATAL sMOVE TO MAILBOX # ‘*eeenee 56 teeeees 
003332 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
003334 000000 HALT *PRIORITY WAS CHANGED,OR WRONG $TSTNM 


>TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 651 
622 003336 012737 000012 000010 15$: MOV #12,10 
623 003344 005037 000012 CLR 12 


CKKABDO 11/44 TRAPS MACRO M1113 


11-NOV-81 10:05 PAGE 31 


TEST #12 = TEST THAT A TRAP OCCURS FOR A ‘'TRAP’’ INSTRUCTION 
| _SBITL TEST #12 = TEST THAT A TRAP OCCURS FOR A ‘‘TRAP’’ INSTRUCTION 


RRA AEAEEAAEAAAEEEAAEA AERA AEA AERA AEAEAEAEAERRERARAHEAREEARHAE RATATAT AAA ES 


:TEST 12 = TEST THAT A TRAP OCCURS FOR A ‘‘TRAP’’ INSTRUCTION 


PPPTTTTTTTTTITITITILILI LILI LLL LL LL LILLE 


624 


Oo 
rrr wa 
WL > SSSNISS 


oO 
win & & 
MOMONMANSN 


631 003454 


Seas 
NNON 


WOWOUWW Ww 


NLS NNONO™NTY 
NNO NONNANNN 


ooo-OooO 
oo 
ovNInu 

_ 


000057 


177766 
000302 


177766 
000304 
000010 


000034 
000302 


TST12: 


100$: 


—— Se OL GL LE LLL LLL, 


#1,CPUERR 
100$ 
#177, SFATAL 
(R2) 
40 oo 
He 
12,10 
#BUFF ,SP 
#1$,RTRAP1 
#57, $FATAL 
(R2) 


SEQUENCE 


; SEE iF BIT 0 OF CPUERR — MONITOR BIT) IS SET 
ANCH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

4; ¥ = oe hg TO FATAL ERROR 


; SEQUENCE ERROR? 


;BRANCH TO ERROR HALT ON SEQ ERROR 


3; STACK erty SETUP 

= RETURN LOCATION 

RESERVED INSTRUCTION, SHOULD TRAP 
TO MAILBOX aenenen S57 seenene 

SET 5 " FATAL ERROR 

: TRAP DIDN'T TRAP,OR WRONG STSTNM 
-T0 SCOPE REPL ACE HALT WITH 240 
+ AND REPLACE NEXT INST WITH 757 


37 


= a = 


ee 
- — —— 


es 


CKKABDO 11/44 TRAPS 
TEST #13 = TEST DEC OF 


632 


GEARS 
SosoosseoosesssS 


AOoro 
WAAA AA AAAW 


5 
Ade ti 


Oo 
=) 


ooo-o 
soosssrssces 
Sea Ses 
™ 
Oo H-NWNONOwW SAWAS — LAA 
ONMNVUNOS SS=8N8 NyNoN 


oS 
oun 


MACRO M1113 


000001 
000177 
000001 
000304 
000013 


000500 
003534 


000474 
000060 


— ET TT 


177766 
000302 


177766 
000304 


000034 


000302 


11-NOV-81 10:05 PAGE 32 
STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


.SBITL TEST #13 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


FRRAREAAAAAAAAAAAAAAKATAATK KAA ee ReAHKAAeKHRAAEKaTAAHAHAKARAeeAATAeRALeAATs 


:TEST 13 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PPPPTTTTTTITICTITITILILTI LILI LLL LLL LLLLLLLLL LLL 


TST13: 


100$: 


1$: 


BIT #1, CPUERR 
100$ 

MOV #177, SFATAL 
(R2) 


Ic #1, — 


INC $T EST 
CMP #13 STESTA 
BNE TST14-1 
MOV *BUFF., 3 

V #1$,RTRAP1 
TRAP 


CMP SP ,ABUF F -4 
TST14 

MOV #60,S$FATAL 
(R2) 


:SEE IF BIT O CF CPUERR —T MONITOR BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF “LE 

:MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

sSET MSGTYP TO Kode ERROR 

:CPU POWER BIT FOUND SET 

7CLEAR THE a FOUND SET 
TE TEST NUMBER 


sUPDATE TE 
; SEQUENCE ERROR? 

;BRANCH TO ERROR HALT ON SEQ ERROR 
; STACK POINTER SETUP 


;RETURN POINTER 
:RESERVED INSTRUCTION 
; TEST DECREMENT OF SP 


sMOVE TO MAILBOX # seeene2 60 
;SET MSGTYP TO FATAL ERROR 

NOT DECREMENTED TWO WORDS,OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 761 


gananee 


38 


_— <-- _——_ —_ — 


CKKABDO 11/44 TRAPS MACRO M1113 ue 10:05 PAGE 33 SEQUENCE 


TEST #14 = TEST THAT PROPER P.C. IS S 
638 -SBTTL TEST #14 = TEST THAT PROPER P.C. iS SAVED 


SAREE EAE E EAE RATE EEE RAE EE RAE E AA RAERE ERR ER ERE ERET REE R ERRATA ES 


:TEST 14 = TEST THAT PROPER P.C. IS SAVED 


PPPCTTTTTTTTITITILTI LILI LILI LLL LLL LL LLLI LiL 


— 


003554 032737 000001 177766 1ST14: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
003562 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
003564 012757 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
003572 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003574 HALT “CPU POWER 
003576 Wetats 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
003604 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
003610 022737 000014 000304 CMP wi4 STESTIN “SEQUENCE ERROR? 
003616 0010 BNE stip 5-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
639 003620 012706 000500 MOV pBUF Psp :STACK POINTER SETUP 
640 003624 012737 003634 000034 MOV #1$,RTRAP1 ; RETURN FROM TRAP POINTER 
641 003632 104400 TRAP TRAP ON THIS INSTRUCTION 
642 003634 022737 003634 000474 1S: CMP #1$.BUFF=4 ‘CHECK INCREMENTED P 
643 003642 001405 BEQ TST15 
003644 012737 000061 000302 MOV #61, $FATAL :MOVE TO MAILBOX # ‘*#eeeee 6] seeeens 
003652 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
003654 000000 HALT ‘INCORRECT P.C.,0R WRONG $TSTNM 


:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


ee ES _——— ee 


—eV—<ssssZZssszzslisill, Utila lll: i LLL LLL 


=. —_——— 
MACRO M1113 11-NOV-81 10:05 PAGE 34 


CKKABDO 11/44 TRAPS 


TEST #15 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


644 


9 4 
650 003744 
651 Op Eeee 


652 003766 
653 003772 
o3¢ 000 


[ae 
OW 
Wn 
NNEN 
WG 
NNO™N 


™N 


So—- -SNeroS 
SSN 


WMron ro vity 
WIAWw 
_NN™N 


sosezs 
Own Ww 
SVNSNoCoUSs 
Sauove 


© 
So 


® 
NSN NNN 


000500 
744 
177776 


000476 
000062 


000500 
004010 
000357 
000476 


000063 


177766 
000302 


177766 
000304 


000034 


000000 
000302 


000034 
177776 
000357 
000302 





ee ee - - — —_ - - —_ -—- . -—-- —— 


SEQUENCE 


-SBTTL TEST #15 = TEST THAT ‘‘OLD*' CC AND PRI ARE PLACED ON STACK 


FRA EARE TAREE A RA EEREEE TESA AEE E REE AE RARER AAERAAAAEREREAAARR EERE RARER ERS 


:TEST 15 = TEST THAT "‘OLD’’ CC AND PRI ARE PLACED ON STACK 


PPPOTTTTTTITIC ITT LLL LLLL LLL LLL LLL LLL 


TST15: 


100$: 


1$: 


2$: 


3$: 


#1, CPUERR 
#177, SFATAL 
(R2) 


#1, CPUERR 
STEST 


TN 
Tstig-12 


#BUFF SP 
#1$,RTRAP1 
cc 


BUFF -2 #0 
#62,$FATAL 
(R2) 


#BUFF SP 
#3$,RTRAP1 
#357,CC 

BUFF ~2,4357 


TS 
#63, $FATAL 
(R2) 


— SBRANCH AROUND CLEAR 


;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
AND HALT IF CLEAR 
TOR FATAL # TO SFATAL 


sMOVE SPECIAL POWER MONI 

;SET MSGTYP TO FATAL ERROR 

:CPU POWER BIT F 

te vy THE BIT FOUND SET 

UPDATE TEST 

; SEQUENCE ERROR? 

cer Up ;BRANCH TO ERROR HALT ON SEQ ERROR 


:SET UP 
:CLEAR CC AND PRICRITY 


3; TRAP 
: TEST THAT OLD STATUS WENT TO STACK 


sMOVE TO MAILBOX # ‘*xeaxee 62 
;SET MSGTYP r FATAL ERROR 

; INCORRECT STATUS 

;TO SCOPE REPLACE HALT WITH 240 
: AND _ NEXT INST WITH 755 


KEEEEERE 


‘SET UP 
“SET PRIORITY 
“COMPARES STATUS ON STACK 


sMOVE TO MAILBOX # 
;SET MSGTYP TO FATAL ERROR 
; INCORRECT STATUS ON STACK,OR WRONG STSTNM 
;TO SCOPE REPLACE HALT WITH 240 

ZAND REPLACE NEXT INST WITH 733 


eetanee 625 eeeeeee 


40 


Se eee a ee le ee ee ee 


e « 
CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 35 SEQUENCE 
TEST #16 = TEST THAT "NEW’’ STATUS IS CORRECT 
658 _SBITL TEST #16 - TEST THAT "NEW'’ STATUS IS CORRECT 
SERRA RAE AEA AE REE AE EERE AERA RAE RAAAAAAER AREER RERERERR AERA EREE REE RE ERS 
“TEST 16 - TEST THAT "'NEW'’ STATUS IS CORRECT 
“eke eee e eee ee AeA AATAAATEAAATAAAATAARATA AERA eA eRe AKee eee eK eeeTeeeeeeeees 
004032 032737 000001 177766 TST16: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
040 001410 BEQ CH AROUND CLEAR AND HALT IF CLEAR 
004042 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
004050 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004052 900600 HALT Ply POWER BIT FOUND SET 
004054 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
004062 005237 000304 100$: INC STESTN “UPDATE TEST 
004 022 37 000016 000304 CMP #16,$TESTN = SEQUENCE ERROR? 
004074 001402 BEOQ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
004076 000137 004344 JMP TST17-12 : JUMP TO ERROR HALT ON SEQ ERROR 
004102 1000$: 
659 004102 012706 000500 MOV #BUFF ,SP 
660 004106 012737 004122 000034 MOV #1$,RTRAP1 
661 004114 005037 000036 CLR RTRAP1+2 :CLEAR FUTURE PRIORITY AND CC 
662 004120 104400 TRAP 
66 004 122 1$: : TEST FOR ‘'C’’ CLEARED 
664 004122 100005 BPL 2$ 
004124 012737 000064 000302 MOV #64,$FATAL :MOVE TO MAILBOX # *#exaxe 64 teeeene 
004132 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
004134 000000 HALT *C NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 
665 004136 2$: 
004136 001005 BNE 3$ 
004140 012737 000065 000302 MOV #65, $FATAL :MOVE TO MAILBOX # texaeee 65 teeeene 
004146 005212 INC (R2) = SET MSGTYP TO FATAL ERROR 
004150 000000 HALT *2 NOT CLEARED 
=TO0 SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 753 
666 004152 3$: 
004152 102005 BVC 4$ 
004154 012737 000066 000302 MOV #66, $FATAL :MOVE TO MAILBOX # tkeeeee 66 xeeneee 
004162 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004164 00 HALT *V NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 745 
667 004166 4$: 
004166 103005 Bcc 5$ 
004170 012737 000067 000302 MOV #67, $FATAL <MOVE TO MAILBOX # ‘«eeneee 67 seeneee 
004176 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004200 000000 HALT T CLE 
"TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 737 
668 004202 032737 000340 177776 S$: BIT #340,CC “TEST PRIORITY 
669 004210 001405 BEQ 
004212 012737 000070 000302 MOV #70, $FATAL :MOVE TO MAILBOX # seeenee 70 eexeeee 
004220 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004222 000000 HALT “PRIORITY NOT ZERO 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 726 
670 004224 012706 000500 6S: MOV BUFF 
671 004230 012737 004246 000034 MOV RTRAPT 
672 004236 012737 000357 000036 MOV Har RTRAP1+2  ;:SET NEW ‘“'CC’’ AND PRIORITY 


meee ee — 
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TEST #16 = TEST 
673 004244 


rnp 
Sr ror 


T ‘NEW’ STATUS IS CORRECT 


104400 


100405 
012737 
005212 
000000 
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000071 


000072 


000073 


000074 


177776 
000017 
000340 


000075 


000302 


000302 


000302 


000302 


000302 


7$: 


9$: 


10$: 


11$: 


TRAP 


—_ - = ———— ——_— + 
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8$ 
#71, $FATAL 
(R2) 


9$ 
#72, $FATAL 
(R2) 


10$ 
#73,SFATAL 
(R2) 


11$ 
#74, $FATAL 
(R2) 


5 SFATAL 
(R2) 


” 


; TRAP HERE 


sMOVE TO ekeeene 


MAILBOX 
SET ey TO FATAL ERROR 


:N NOT S 
:TO SCOPE REPLACE HALT WITH 
SAND REPLACE NEXT INST WITH 


;MOVE TO MAILBOX # *eaanne 

sSET MSGTYP TO FATAL ERROR 
NOT SET 

:19 SCOPE REPLACE HALT WITH 
AND REPLACE NEXT INST WITH 


sMOVE TO MAILBOX # xeenene 
3SeT ae TO FATAL ERROR 


71 


40 
07 


72 


240 
701 


73 


;V_NOT SET 
:TO SCOPE REPLACE HALT WITH 240 


[AND REPLACE NEXT INST WITH 


sMOVE TO MAILBOX # *eeee2% 
a ag TO FATAL ERROR 


;TO SCOPE REPLACE HALT WITH 
SAND REPLACE NEXT INST WITH 


sMOVE TO MAILBOX # *eaanne 
:SET MSGTYP TO FATAL ERROR 
:PRIORITY WAS CHANGE 


673 

74 
240 
665 


75 


D,OR WRONG 
>TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 651 


eenaneee 


eeaeneeanee 


eeenane 


Reaeeee 


Seaeeane 


STSTNM 


SEQUENCE 


42 
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CKKABDO_11/44 TRAPS MACRO M1113 11-NOV-81 10: He a 36 SEQUENCE 
TEST #17 = TEST THAT ALL COMB ‘"TRAP’* WILL CAUSE A 
683 -SBTTL TEST #17 = TEST THAT ALL COMB ‘‘TRAP’’ WILL CAUSE A TRAP 


steaaeneeegaaeeeeegaesereeeeeeareqaaaggeaaeeeegaaseesasenaneueeedeereaeqers 


:TEST 17 ~ TEST THAT ALL COMB ‘‘TRAP’’ WILL CAUSE A TRAP 


PPOCrerTTTTTTTT TITTLE LLL LLL LLL LL LLL LLL ei 


004356 032737 000001 177766 isT17: BIT #1. CPUERR <SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004364 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
904 012737 000177 000302 MOV #177,$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $SFATAL 
004374 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004376 900000 HALT POWER BIT FOUN SET 
004400 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
004406 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
004412 022737 000017 000304 CMP #17,$TESIN * SEQUENCE ERROR? 
004420 001011 BNE $ “BRANCH TO ERROR HALT ON SEQ ERROR 
684 004492 012737 104400 004442 MOV HTRAP,2$ : INITIALIZE BASE TRAP INSTRUCTION 
685 004430 012737 004456 000034 MOV #4$, 34 “RETURN FROM TRAP TO RAI 
686 004436 012706 000500 1$: MOV #BUFF ,SP “SET UP STACK POINTER 
687 004442 104400 28: TRAP “TRAP INST WILL BE MODIFIED TO TRAP+377 
004444 012737 000076 000302 MOV #76, $FATAL sMOVE TO MAILBOX # *eeenee 76 seenene 
004452 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
004454 000000 HALT “PREVIOUS INST FAIL ED TO TRAP.OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
689 004456 005237 004442 4$: INC 2$ “INCREMENT TRAP INSTRUCTION 
690 004462 022737 104777 004442 CMP #104777.2$ “ TRAP+377 TO UPPER LIMIT 
691 004470 103362 BHIS “HAVE WE TESTED ALL 
692 004472 012737 000036 000034 MOV #36, 34 
693 004500 005037 000036 CLR 36 
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TEST #20 = TEST THAT A TRAP OCCURE 
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177766 
000302 


177766 
000304 


000020 
000302 


1 
ON 


F 
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‘I0T’’ INSTRUCTION 
-SBTTL TEST #20 - TEST THAT A TRAP OCCURES ON AN “‘IOT'’ INSTRUCTION 


sR A RAE EAA E AREA ARATE RAAT ERAAEREARERERAEE REAR REE ETE ES 


:TEST 20 - TEST THAT A TRAP OCCURES ON AN “‘IOT’’ INSTRUCTION 


PPPerreTrTTTTTITITITITI TTI LTE LLL LLL LLL LLL LLL LLL 





+ST20: BIT #1. CPUERR SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HALT =CPU POWER BIT FOUND SET 
BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
100$: INC STESTN “UPDATE TEST NUMBER 
CMP #20 STESTN *SEQUENCE ERROR? 
BNE S21 1-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
MOV yBUFF “3 :STACK POINTER SETUP 
MOV #1$,.RTRAP2 *RETURN LOCATION 
10T “RESERVE INSTRUCTION, SHOULD TRAP 
MOV #77 SF ATAL =MOV E TO MAILBOX keeaaae 77 wtenees 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT *I0T DIDN'T TRAP,OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 764 


EE 








CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 38 SEQUENCE 
TEST #21 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 
700 -SBTTL TEST #21 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


{RRR ERAR RARE ARATE AEE EAAAE RARE AAA AARERAARARAARAARARE ARETE EERE E ES 


:TEST 21 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


POPP TT TT TTT TITTTITITIT LILLIE LLL LLL LLL 


004576 032737 000001 177766 isT21: BIT #1. CPUERR sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
604 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
606 012737 000177 000302 MOV #177, $FATAL ‘MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
004614 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
904616 000000 HALT POWER BIT FOUND SET 
004620 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
004626 0052 7 000304 100$: INC STESTN “UPDATE TEST NUMBER 
0046 2 022 37 000021 000304 CMP #21 STESTN ‘SEQUENCE ERROR? 
00464 1011 BNE St2e-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
701 004642 012706 000500 MOV pBUF sSTACK POINTER SETUP 
02 004646 012737. 004656 000020 MOV Tid, RIRAP2 “RETURN POIN 
703 004654 000004 10T “RESERVED INSTRUCTION 
656 020627 000474 1$: CMP SP ,ABUF F -4 *TEST DECREMENT OF SP 
705 004662 001405 BEQ 
664 012737 000100 000302 MOV #100., SF ATAL :MOVE TO MAILBOX # *x*eeeee 100 eatanen 
004672 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004674 000000 HALT :NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
SCOPE REPLACE HALT WITH 240 


‘AND REPLACE NEXT INST WITH 761 


oOo ae en 


45 


eee 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 39 SEQUENCE 46 
TEST #22 - TEST THAT PROPER P.C. IS SAVED 
706 _SBITL TEST #22 - TEST THAT PROPER P.C. IS SAVED 
SAAR AREA AAA EA AAA EAE AAA AREA AERA AERARRE AREA REE AERA AERA AREER RES 
“TEST 22 - TEST THAT PROPER P.C. IS SAVED 
eA AEAAEAAEEEAEAEEEAEAEAEEAEEREREEEEEEREREEERAAAEAAAAAREEREAEAAKRAREEAHAEREE 
004676 032737 000001 177766 TST22: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004704 001410 BEQ 10 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
004706 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
004714 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004716 000000 HALT *CPU POWER BIT FOUND SET 
004720 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
004726 005237 000304 100$: INC TESTN “UPDATE TEST NUMBER 
004732 022737 000022 000304 CMP #22,$TESTN “SEQUENCE ERROR? 
004740 601012 BNE TST23-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
707 004742 012706 000500 MOV #BUFF SP :STACK POINTER SETUP 
708 004746 012737 004756 000020 MOV #1$,RTRAP2 “RETURN FROM TRAP POINTER 
709 004754 10T = TRAP ON THIS INSTRUCTION 
710 004756 022737 004756 000474 1S: CMP #1$.BUFF-4 “CHECK FOR INCREMENTED P.C. 
711 004764 001405 BEQ TST 
004766 012737 000101 000302 MOV #101, $FATAL :MOVE TO MAILBOX # *teexee 101 sxeeeee 
004774 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004776 000000 HALT : INCORRECT P.C 


--OR WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 
zAND REPLACE NEXT INST WITH 760 


ee ee ee eee 


I 
Se 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 40 SEQUENCE 
TEST #23 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 
712 -SBTTL TEST #23 = TEST THAT ‘‘OLD’' CC AND PRI ARE PLACED ON STACK 


SRAAAAAAAAAAAAAEA AREER EERE EEE AEE ERE AERA REREAREAAEAREEREAAERAAEERER EEE RES 


:TEST 23 - TEST THAT ‘‘OLD'’ CC AND PRI ARE PLACED ON STACK 


PPPOT TOTTI TTITIITT LIT LILLE LILLIE LLL LLL LLL 


005000 032737 000001 177766 TST23: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
5006 001410 BEOQ 100$ *BRANCH AROUND CLEAR AND HALT IF CLEAR 
005010 012737 000177 000302 MOV #177, $SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
005016 005212 INC (R2) "SET MSGTYP fo FATAL ERROR 
005020 000000 HALT “CPU POWER BIT FOUND SET 
0050¢2 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
005030 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
005034 022737 000023 000304 CMP #23.$TESIN “SEQUENCE ERROR? 
005042 001040 BNE TST24-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
713 005044 012706 000500 MOV #BUFF ,SP :SET UP 
714 005050 012737 005066 000020 MOV #1$,RTRAP2 “SET UP 
715 005056 005037 177776 CLR CC “CLEAR CC AND PRICRITY 
716 005062 000257 CCC 
717 005064 600004 10T : TRAP 
718 005066 023727 000476 000000 1S: CMP BUFF-2,#0 “TEST THAT OLD STATUS WENT TO STACK 
719 005074 001405 BEQ 
005076 012737 000102 000302 MOV #102, SFATAL :MOVE TO MAILBOX # *eeenee 102 seeeeee 
005104 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005106 000000 HALT ‘INCORRECT STATUS 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
720 005110 012706 000500 2$: MOV #BUFF SP *SET UP 
721 005114 012737 005134 000020 MOV #3$,RTRAP2 :SET UP 
722 005122 012737 000357 177776 MOV #357,CC “SET PRIORITY 
723 005130 000277 SCC “SET CC 
724 005132 000004 10T * TRAP 
725 005134 023727 000476 000357 3$: CMP BUFF -2,#357 “COMPARES STATUS ON STACK 
726 005142 001405 BEQ TST94 
005144 012737 000103 000302 MOV #103, SFATAL sMOVE TO MAILBOX # tteneee 103 eeeneee 
005152 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005154 000000 HALT i INCORRECT STATUS ON STACK.OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 


ZAND REPLACE NEXT INST WITH 732 


47 


a ee - 





TTT EEE EEE EEE EE ETE LLL 
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| CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 41 
TEST #24 - TEST THAT “NEW STATUS IS CORRECT 


SEQUENCE 


727 _SBITL TEST #24 - TEST THAT "NEW'’ STATUS IS CORRECT 
SERA AERAEARAEAERE EERE RE REAR AE AER EERE REREREERARARE EERE EAE REAR AEAE ERASE 
“TEST 24 - TEST THAT ‘'NEW'’ STATUS IS CORRECT 
PeeerrrrrerrrTTT TTT TT TT TTT TTT TTT TTT TTT LLL 
005156 032737 000001 177766 $124: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
005164 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
005166 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
005174 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005176 000000 HALT “CPU POWER BIT FOUND SET 
005200 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
005206 005237 000304 100$: INC ™N “UPDATE TEST E 
005212 022737 000024 000304 MP #24,$TESIN “SEQUENCE ERROR? 
005220 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
005222 000137 005470 JMP 12$ : JUMP TO ERROR HALT ON SEQ ERROR 
005226 1000$ 
728 005226 012706 000500 MOV #BUFF ,SP 
729 005232 012737 005246 000020 MOV #1$,RTRAP2 
730 005240 005037 000022 CLR RTRAP2+2 *CLEAR FUTURE PRIORITY AND CC 
731 005244 4 10T ; 
732 005246 1$: : TEST FOR "'C’’ CLEARED 
733 005246 100005 BPL 2$ 
005250 012737 000104 000302 MOV #104, S$FATAL :MOVE TO MAILBOX # seeenee 104 exeenee 
005256 005212 INC (R2) °SET MSGTYP TO FATAL ERROR 
005260 000000 HALT *N NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
734 005262 2$: 
005262 001005 BNE 3$ 
005264 012737 000105 000302 MOV #105, $FATAL :MOVE TO MAILBOX # *exexee 105 seeeeee 
005272 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005274 000000 HALT *Z2 NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 753 
735 005276 3$: 
005276 102005 BVC 4$ 
005300 012737 000106 000302 MOV #106, $FATAL :MOVE TO MAILBOX # teeeeee 106 texans 
5306 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005310 000000 HALT :V NOT CLEARED 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 745 
736 005312 4$: 
005312 103005 BCC 5$ 
005314 012737 000107 000302 MOV #107, $FATAL :MOVE TO MAILBOX # *eeeeee 107 eeenene 
005322 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
005324 00 HALT *C NOT CLEARED 
"TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 737 
737 005326 032737 000340 177776 5$ BIT #340,CC ‘TEST PRIORITY 
738 005334 001405 BEQ 
005336 012737 000110 000302 MOV #110, $FATAL :MOVE TO MAILBOX # weeeeee 110 teeeeee 
005344 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
005346 000 HALT “PRIORITY NOT ZERO 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 726 
739 005350 012706 000500 6$ MOV #BUF 
740 005354 012737 005372 000020 MOV eR AP2 
741 005362 012737 000357 000022 MOV 435) RAP? 2 :SET NEW ''CC'’ AND PRIORITY 
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HAT “NEW’ STATUS IS CORRECT 


000000 


013706 


001405 


012737 
005212 
000000 


012737 
005037 


ee ee ee ee ee ee 


000111 


000112 


000113 


000114 


177776 
000017 
000340 


000115 


000022 
000022 


000302 


000302 


000302 


000302 


000302 


000020 


7$: 


9$: 


10$: 


11$: 


12$: 


13$: 
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8$ 

#111, SFATAL 
(R2) 

9$ 
#112,$FATAL 
(R2) 

10$ 

#113, $FATAL 
(R2) 


11$ 
#114, $FATAL 
(R2) 


#115, SFATAL 
(R2) 


#22,20 
22 


; TRAP HERE 


sMOVE TO MAILBOX # *eeeeee 1171 
gh ae TO FATAL ERROR 


NOT 
‘To SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 707 


:MOVE TO MAILBOX # ‘*eeenee §=172 
sSET ag TO FATAL ERROR 


:TO0 SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 701 


:MOVE TO MAILBOX # *eaxnee 81713 
SET gg hg TO FATAL ERROR 


:V_NO 
:TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 673 


sMOVE TO MAILBOX # ‘**eee0% 114 
:SET MSGTYP TO FATAL ERROR 


:C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 665 


sMOVE TO MAILBOX # *eeeae" 115 
:SET MSGTYP TO FATAL ER 

*PRIORITY Y WAS CHANG 
:TO SCOPE REPLACE HALT WITH 240 
: AND REPLACE NEXT INST WITH 651 


HALT 


oe ene e - 


aeeeneneee 


aenagaee 


2aeeeese 


a£eennane 


gaaeene 


ROR 
D.OR WRONG STSTNM 


SEQUENCE 


49 
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TEST #25 = TEST THAT A TRAP OCCURS ON AN EMT 
753 .SBTTL TEST #25 - TEST THAT A TRAP OCCURS ON AN EMT INS 


eRe AARAAAAAAAEKEAAAATAAETAAAAA Ae Ae KARA AKeRRARRARAe AAA AA ALAR AeA AAA AAS 


=TEST 25 - TEST THAT A TRAP OCCURS ON AN EMT INS 


LS I 
_ — _— 


—— re 


PPOTrrerrTTTTTTITITITITILILITL LLL LLL LLL LiL 


005514 032737 000001 177766 TST25: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
005522 001410 BEQ 1 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
005524 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
005522 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
005534 000000 HALT R BIT SET 
005536 042737 000001 177766 BIC 4 2 CPUERR : CLEAR THE BIT FOUND SET 
005544 005237 000304 100$: INC TE TEST 
005550 022737 000025 000304 CMP ne, STESTN ; SEQUENCE ERROR? 
005556 001006 BNE ST26 6-1 CH TO ERROR HALT ON SEQ ERROR 
754 005560 012706 000500 MOV pBUr sp : STACK POINTER SETUP 
755 005564 012737 005606 000030 MOV #1$,RTRAP3 ;RE TURN LOCATION 
796 005572 104000 EMT RESERVE INSTRUCT 10M, SHOULD TRAP 
757 005574 012737 000116 000302 MOV #116, $FATAL :MOVE TO MAILBOX # *eeeees 116 seneees 
005602 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
005604 000000 HALT SEMT DIDN'T TRAP,OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 764 
758 005606 1$: 


eee ae —_-- 


759 
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MACRO M1113 


000001 
000177 


000001 
000304 
0600026 
600500 
005666 
000474 
000117 


—————_——— _ T_T LT TTT 


177766 
000302 


177766 
000304 


000030 


000302 


11-NOV-81 10:05 PAGE 43 
STACK POINTER ON A TRAP OPER 


SEQUENCE 


-SBTTL TEST #26 - TEST DEC OF STACK POINTER ON A TRAP OPER 


SRAAAAAAAAAAAAAAAAAAERATAEAE AERA RARER AERAKKRAKARAR KARA RHE RA AAA KARAT A ES 


:TEST 26 - TEST DEC OF STACK POINTER ON A TRAP OPER 


PPPTTPOrrTTTTTITITITITITITITLI TTL LLL LL LLL LLL 


S126: BIT #1. CPUERR 
BEQ 100$ 
MOV #177, $FATAL 
INC (R2) 
HALT 
BIC a1, 2 CPUERR 
100$: INC 
CMP heb, STESTN 
BNE St27~12 
MOV peur ; ss 
MOV #1$,RTRAP3 
EMT 
1$: CMP SP, ABUF F -4 
BEQ 
MOV #117, $FATAL 
INC (R2) 
HALT 


; SEE IF BIT O OF ea (POWER MONITOR BIT) IS SET 
CH AROUND AR AND HALT IF CLE 
TOR FATAL # TO SFATAL 






;UPDATE TEST 
; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 
STACK POINTER SETUP 
;RETURN POINTER 
SRESERVED INSTRUCTION 
; TEST DECREMENT OF SP 


;MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL ERROR 

:NOT DECREMENTED TWO WORDS.OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 

sAND REPLACE NEXT INST WITH 761 


aanenee 117 seeenee 


EE A Se eee ae re — 


51 


| eens 11/44 TRAPS 


EST #27 = TEST THAT PROPER P.C. 


765 


8833339 
Sssrers 


23338383 
Armor 


oooe 
OH VS 


CRORE OREN 


o-oo 
_—— 


MACRO M1113 


000001 
000177 
000001 
000304 
000027 


000500 
005766 


005766 
000120 


IS SAVED 


177766 
000302 


177766 
000304 


000030 
000474 
000302 


-SBTTL TEST #27 = TEST THAT PROPER P.C. 


11-NOV-81 10:05 PAGE 44 


SEQUENCE 52 


iS SAVED 


SERA EA AE AAAAERA EAA AAATE TEA E AEA AA AERA RA AEREREAEAREREREHERE AE ERE RARER REESE 


-TEST 27 - TEST THAT PROPER P.C. IS SAVED 


oe ana ag alumni ge gg mgt elt 


TST27: BIT 


6 
100$: INC 


18: CMP 


f CPUERR 
#177, SFATAL 
(R2) 


#1,CPUERR 
$TESTN 
T1013. 
ABUFF ,SP 
#1$ ,.RTRAP3 
#1$ ,BUFF-4 


TST 
#120, $FATAL 
(R2) 


; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
+ SET MSGTYP TO FATAL ERROR 
OWE OUND SET 


; UPDAT NUMBER 
; SEQUENCE ERROR? 
ANCH TO ERROR HALT ON SEQ ERROR 
; STACK POINTER SETUP 
;RTURN ‘ee TRAP POINTER 
; TRAP ON THIS INSTRICTION 
:CHECK FOR INCREMENTED P.C. 


:MOVE TO MAILSOX # ‘*eeaae% 120 
:SET MSGTYP TO FATAL ERROR 

* INCORRECT P.C.,0R WRONG $TSTNM 
-T0 SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 760 


ageaaenat 


ee 


——— 


em eae i ee 
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aK 11/44 _ TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 45 SEQUENCE 


ST #30 - TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


771 


-SBTTL TEST #30 - TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


EERE EEEAAAAAAEAEEEEEEAEEEERERERAAEAEAAAARARAAAEAEEREEEREEAEEAEE TEES 


“TEST 30 - TEST THAT “‘OLD’' CC AND PRI ARE PLACED ON STACK 


EERE AEEAEEEAEREEAAEEAAERERERERARAARARARAAEAERERAE CKERARAEERAAEAES 


006010 032737 000001 177766 TST30: BIT #1, CPUERR *SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006016 00141 BEQ 1 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
0060 01275 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
9060 00521 INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT :C R BIT SET 
0060 2 0427 000901 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
006040 00 2 7 000304 100$: INC $TESTN “UPDATE TEST NUMBE 
006044 022 7 000030 000304 CMP #30. $TESTN “SEQUENCE ERROR? 
006052 1040 BNE TST31-12 :BRANCH TO ERROR HALT ON SEQ ERROR 
77 906054 012706 000500 MOV #BUFF SP :SET UP 
77 012737 006076 000030 MOV #1$,RTRAP3 *SET UP 
77% 006066 005037 177776 CLR CC “CLEAR CC AND PRICRITY 
775 006072 000257 CCC 
776 006074 104000 EMT : TRAP 
777 006076 023 000476 000000 1S: CMP BUF F-2,#0 *TEST THAT OLD STATUS WENT TO STACK 
778 006104 001405 BEQ 
006106 012737 000121 000302 MOV #121, $FATAL -MOVE TO MAILBOX # *#eexee 12] seeneee 
06114 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
006116 000000 HALT ‘INCORRECT STATUS 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
779 006120 012706 000500 2$: MOV FF,SP *SET UP 
780 006124 012737 006144 000030 MOV #3$,.RTRAPS *SET UP 
781 006132 012737 000357 177776 MOV #357,CC *SET PRIORITY 
782 006140 000277 SCC *SET CC 
783 006142 104 EMT * TRAP 
784 006144 023727 000476 000357 3S: CMP BUFF-2,4357 “COMPARES STATUS ON STACK 
785 006152 001405 BEQ 
006154 012737 000122 000302 MOV #122, $FATAL *MOVE TO MAILBOX # texaeee 122 seewens 
006162 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006164 000000 HALT ‘INCORRECT STATUS ON STACK,OR WRONG STSTNM 


:TO SCOPE REPLACE HALT WITH 240 
zAND REPLACE NEXT INST WITH 732 


nl meee eee 





_—--— 
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(kk 11/44 TRAPS MACRO M1113 11-NOv=81 10:05 PAGE 46 SEQUENCE 
TEST #31 - TEST THAT “NEW STATUS IS CORRECT 
786 _SBITL TEST #31 - TEST THAT "NEW'' STATUS IS CORRECT 
fA AAAAAAAAAAAEEAERAEAAAAA EAA AERA ARARARAERE RAE AAAERAAERAEATAERE RARE TREES 
“TEST 31 = TEST THAT "NEW" STATUS IS CORRECT 
PPPOrrorrrTTeeTTTTTTTITTTITITI TTL LLL LLL LLL 
006166 032737 000001 177766 TST31: BIT " CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006174 001410 BEQ 7 “BRANCH AROUND CLEAR AND HALT IF CL 
006176 01273 000177 000302 MOV “i ,, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
005212 INC ;SET MSGTYP TO FATAL ERROR 
HALT POWER BIT FOUND SET 
00621 0427 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
16 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
22 0227 7 000031 000304 CMP #31,$TESTN “SEQUENCE ERROR? 
006 1402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
32 000137 006474 ine JMP TST32=12 > JUMP TO ERROR HALT ON SEQ ERROR 
787 3 012706 5 MOV #BUFF ,SP 
| 788 42 012737 006256 000030 MOV #1$ RTRAP3 
789 50 005037 000032 CLR RTRAP3+2 =CLEAR FUTURE PRIORITY AND CC 
790 54 104000 EMT 
791 006256 1$: :TEST FOR ‘'C’’ CLEARED 
792 006256 100005 BPL 2$ 
006260 012737 000123 000302 MOV #123, $FATAL :MOVE TO MAILBOX # *eexane 123 xeeneee 
66 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006270 000000 HALT *C NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 
793 006272 2$: 
006272 001005 BNE 3$ 
006274 012737 000124 000302 MOV #124, $FATAL :MOVE TO MAILBOX # teeeeee 124 seeenes 
006302 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
000000 HALT *Z2 NOT CLEARED 
‘TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 753 
794 006306 3$: 
006306 102005 BVC 4$ 
006310 012737 000125 000302 MOV #125, $FATAL :MOVE TO MAILBOX # teeexee 125 eeeneee 
006316 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006320 000000 HALT ;V NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 745 
795 006322 4$: 
006322 103005 Bcc 5$ 
4 012737 000126 000302 MOV #126, $FATAL *MOVE TO MAILBOX # tteeeee 126 eeneeee 
006332 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
334 000000 HALT iC NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 737 
796 006336 032737 000340 177776 5$: BIT #340,CC “TEST PRIORITY 
797 006344 001405 BEOQ 
006346 012737 000127 000302 MOV #127, SFATAL :MOVE TO MAILBOX # *tteeeee 127 eeeenee 
006354 005212 INC (Ro) “SET MSGTYP TO FATAL ERROR 
006356 000000 HALT “PRIORITY NOT 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 726 
798 006360 012706 000500 6S: MOV #BUF F +SP 
799 006364 01273 006402 000030 MOV #7$,RTRAP3 
800 006372 012737 000357 000032 MOV aah RIRAP3+2 :SET NEW '’CC'' AND PRIORITY 





54 


etiam ----- — 





me ee 


| > 5 


| CKK 11/44 TRAPS : MACRO M1113 ms ad 10:05 PAGE 46-1 SEQUENCE 55 
TEST #31 = TEST THAT “NEW STATUS IS CORRECT 
801 006400 104000 EMT : TRAP HERE 
802 006402 7$: 
006402 109403 BM] 8$ 
006404 012737 000130 000302 MOV #130,SFATAL sMOVE TO MAILBOX # «eaenee 130 teeenee 
006412 005212 INC (R2) : SET MSGTYP TO FATAL ERROR 
006414 HALT N NOT S 
to SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 707 
803 006416 8$: 
006416 001405 BEQ YS 
006420 012737 000131 000302 MOV #131,$FATAL sMOVE TO MAILBOX # *eeener 131 weenene 
006426 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
0064 000000 HALT +2 NOT T 
=TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 701 
804 006432 9$: 
006432 102405 BVS 10$ 
006434 012737 000132 000302 MOV #132,$FATAL sMOVE TO MAILBOX # *eeneee 132 teeneee 
006442 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
006444 000000 HALT :V NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 673 
805 006446 10$: 
006446 103405 BCS 11$ 
006450 012737 000133 000302 MOV #133,$FATAL :MOVE TO MAILBOX # xeeeene 813535 seenene 
006456 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
006460 000000 HALT =C NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 665 
006462 000257 11$: ccc 
807 006464 022737 000340 177776 CMP #340,CC 
08 006472 001405 BEQ TST3 
006474 012737 000134 000302 MOV #134, SFATAL :MOVE TO MAILBOX # ‘*xeexene 1354 taeeeee 
006502 005212 INC (R2) SET sp gt TO FATAL ERROR 
006504 000000 HALT ;PRIORITY D,OR WRONG STSTNM 


C 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 653 


—_—_— te we ee ae 


| 7 





CKKABDO 11/44 TRAPS MACRO M1113 11-Nov-8! 419: 205 PAGE 47 SEQUENCE 
TEST @ - TEST THAT ALL COMB EMT WILL CAU 
809 _SBTTL TEST #32 - TEST THAT ALL COMB EMT WILL CAUSE A TRAP 
sRARAAAAA AAA A ARE AA RERA TEETER EAR AEA RE REA REREEAERRARERRER AREER RE EEE R ARETE 
“TEST 32 - TEST THAT ALL COMB EMT WILL CAUSE A TRAP 
PPPOrroerTTTTTTTTTTITITT ITT LILLIE LE LLL LLL 
006506 032737 000001 177766 S132: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006514 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
006516 C1273? 000177 000302 MOV #177, $FATAL *MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
006524 212 INC (R2) “SET MSGTYP TO FATAL ERROR 
006526 HALT “CPU POWER BIT FOUND SET 
0065 0427 000001 177766 BIC #1, CPUERR ; CLEAR THE BIT FOUND SET 
0065 003237 000304 100$: INC TESTN TE TEST NUMBER 
006542 022 37 000032 000304 CMP #32,$TESIN * SEQUEN CE ERROR? 
00655 1011 BNE “BRANCH TO ERROR HALT ON SEQ ERROR 
810 006552 012737 104000 006572 MOV #EMT,2$ INITIALIZE BASE EMI 1 INSTRUCTION 
811 006560 012737 006606 000030 MOV #4$, 30 “RETURN FROM T 
812 006566 012706 000500 1$: MOV #BUFF ,SP ;SET UP STACK ROINTER 
813 006972 104000 2s: EMT *TRAP INST. WILL BE MODIFIED TO EMT+377 
006574 012737 000135 000302 MOV #135,$FATAL sMOVE TO MAILBOX # ‘*texnee 135 seneeee 
006602 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
006604 000000 HALT PREVIOUS INST FAILED TO TRAP.OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 761 
815 006606 005237 006572 4$: INC 2$ > INC E NT TRAP INSTRUCTION 
816 006612 022737 104377 006572 CMP #EMT+377,2$ “EMT+377 TO EMT? 
gi7 006620 103362 BHIS  1$ SHAY WE TESTED ALL 
819 006622 012737 000032 000030 MOV #32,30 -/.4¢ 
820 006630 005037 000032 CLR 32 *HALT 


eens age eee — << 


r 


TEST # 
821 





BEER 
cere 


: 
s&s 





"cxKABO 11/44 _ TRAPS MAC 13. «7 
3 - TEST THAT A TRAP OCCURES ON 


mNwN 


RO M1113 


000001 
000177 


00304 


000033 


000500 
006726 


000136 


177766 
000302 


177766 
000304 


000014 
000302 


AN “'TRACE-TRT 
.SBTTL TEST #33 - TEST THAT A TRAP OCCURES ON AN ‘‘TRACE-TRT’’ INS 


SRA AERA EAA AAA AEA AREER AREA EA RA EERE RR ARAEA RARER A EERE REE EERE EES 


:TEST 33 ~ TEST THAT A TRAP OCCURES ON AN ‘'TRACE-TRT'' INS 


PPP eTreerT TTT TTI TITTLE LL LIL LLL LLL LLL 


TST33: 


100$: 


1$: 


-—_— 


1-NOV-81 10: 0. PAGE 48 


" INS 


#1, CPUERR 
100$ 

#177, SFATAL 
(R2) 

oats oo 
7 a" 
raUFF 2sP 
#1$,.RTRAPG 


#136, SFATAL 
(R2) 





CH AROUND CL 
:MOVE SPECIAL POWE 


SEQUENCE 


3 > SEE IF BIT 0 OF CPUERR (POWER a BIT) IS SET 


EAR AND HALT IF CLEA 
R gitty FATAL # TO SFATAL 


UPDATE TE 


‘SEQUENCE ERROR? 
“BRANCH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 


“RETURN LOCATION 
i RESERVED fore op gee SHOULD TRAP 

VE TO MAI ckknanee 136 «eeeene 
SET MSGTYP TO FATAL ERROR 


;TRT DIDN*T TRAP,OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 764 


ie 


57 





CKK 11/44 T 
TEST # 


827 


007024 





TRAPS 


-_ 
Wino 
NNO NM NOMINEE N 
4 > arta hata Ww 
—NNNONINON 


MNUNWA™N 


MACRO M1113 


000474 
000137 


177766 
000302 


177766 
000304 


000014 


000302 





11-NOV-81 10:05 PAGE 49 
- TEST DEC OF STACK POINTER ON A TRAP OPERATION 


ce ee + eee 


G 5 


SEQUENCE 


-SBTTL TEST #34 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


RAE EAERERERRA REAR EAAAEAE AREER AEE REREAAAEERAAEEREARERAREREREREAEREE EEE RES 


:TEST 34 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PPT T ToT TT TTT TIT TILITIE LILLIE LLL LLL LLLLLLLALLL LLL LLL Lh 


TST34: BIT #1. CPUERR 
BEQ 1 
MOV #177, $FATAL 
INC (R2) 
HALT 
BIC #1, CPUERR 
100$: INC STESTN 
CMP #34 STESIN 
BNE ST33~12 
MOV WRUFF "3 
MOV #1$,RTRAPG 
TRT 
1$: CMP SP ,ABUF F=4 
BEQ TS 
MOV #137, $FATAL 
INC (R2) 
HALT 


i ; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND 


H LEAR AND HALT IF CLE 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
+ SET MSGTYP TO FATAL ERROR 

PU POWER BIT FOUND SET 
CLEAR THE BIT FOUND SET 
:UPDATE TEST NUMBER 
: SEQUEN NCE ERROR? 

H TO ERROR HALT ON SEQ ERROR 

: STACK POINTER SETUP 


;RETURN POINT 
;RESERVED INSTRUCTION 
;TEST DECREMENT OF SP 


sMOVE TO MAILBOX : 137 
:SET MSGTYP - FAT 
:NO S,OR WRONG STSTNM 


TED TWO WORD 
:TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 761 


REEKKEEK eeaenne 


58 


| 

| CKK 

| TEST # 
833 


I 


TRAPS 
135 . ‘Test THAT PROPER P.C. IS SAVE 


Nw 
NUN UN N™N 


NSN WS A 


—WOWOW 
mNM 


—_—— 


ee ee 
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MACRO M1113 ae 10:05 PAGE 50 


000001 
000177 
000001 
000304 
000035 


000500 
007106 


007106 
000140 


177766 
000302 


177766 
000304 


000014 
000474 
000302 


SEQUENCE 


-SBTTL TEST #35 = TEST THAT PROPER P.C. iS SAVED 


sR EAA AEAA EAA EEAARERAE EATER EAR AE REEREREREREERREARARREAERAEEAREAEA ERAS 


:TEST 35 - TEST THAT PROPER P.C. IS SAVED 


WPPOTTOTTTTTICITTTT LILI LLL LILI LLL LLL LIL iii 


TST35: 


100$: 


18: 





#1, CPUERR 
100$ 

#177, SFATAL 
(R2) 

#1, — 


$TE 
a5, STESTN 
ST36~12 


rau PSP 

#1$ .RTRAPS 
FF=4 

13 6 

#140, SFATAL 

(R2) 


+SEE IF BIT 0 OF CPUERR (POWER ith BIT) IS SET 
CH AROUND CL 


AR AND HALT IF CLE 
Uy FATAL # TO SFATAL 





TE 
SEQUENCE ERROR? 

;BRANCH TO ERROR HALT ON SEQ ERROR 
;STACK POINTER SETUP 


; RETURN or TRAP POINTER 
; TRAP ON THIS INSTRUCTION 
:CHECK FOR INCREMENTED P.C. 


s;MOVE TO MAILBOX # 


aenanee 140 t2tenee 


————= ee ee eee 


59 


— «a eee 
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te 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 51 SEQUENCE 
TEST #36 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 
839 .SBTTL TEST #36 - TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


FRR AAAAAAAAAAAAAAAAEA ARETE A TERA AEA REEA RARE REARARERERERERAAERARRE RARER ERE ES 


:TEST 36 - TEST THAT ‘‘OLD'' CC AND PRI ARE PLACED ON STACK 


POT TTOTITTITITITITIIT TLL LLL LILI LLL LLL LLL LLL LLL 


007130 032737 000001 177766 TST36: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
7136 001410 BEQ 1 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
007140 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
007146 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007150 HALT : ET 
007152 Qua737 000001 177766 BIC #1, CPUERR ; CLEAR THE BIT FOUND SET 
007160 00 237 000304 100$: INC STESTN “UPDATE TEST 
7164 022737 000036 000304 CMP #36 STESTIN * SEQUENCE ERROR? 
007172 001040 BNE 137 7-1 sBRANCH TO ERROR HALT ON SEQ ERROR 
840 007174 012706 000500 MOV peur "3p :SET UP 
841 007200 012737 007216 000014 MOV #1$,RTRAPG “SET UP 
842 007 005037 177776 CLR CC “CLEAR CC AND PRICRITY 
843 007212 000257 CCC 
B44 007214 000003 TRT : TRAP 
845 007216 023727 000476 000000 1$: CMP BUFF-2,40 “TEST THAT OLD STATUS WENT TO STACK 
846 “TEST FOR ALL ZEROS 
B47 007224 001405 BEQ 2$ 
007226 012737 000141 000302 MOV #141, $FATAL :MOVE TO MAILBOX # ‘*eeenee 141 xxeeeee 
007234 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007236 000000 HALT : INCORRECT STATUS 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
848 007240 012706 000500 2$: MOV FSP ;SET UP 
007244 012737 007264 000014 MOV m8, RTRAPS “SET UP 
850 007252 012737 000357 177776 MOV 357,CC “SET PRIORITY 
851 007260 000277 SCC “SET-SET CC 
852 007262 000003 TRT : 
853 007264 023727 000476 000357 38: CMP BUFF -2,4357 “COMPARES STATUS ON STACK 
854 007272 001405 BEQ 137 
007274 012737 000142 000302 MOV #142, SF ATAL :MOVE TO MAILBOX # teenexe 142 seeneee 
007302 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007304 000000 HALT “INCORRECT STATUS ON STACK.OR WRONG STSTNM 
‘TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 732 
' 


eee — 0 eee “++ 





60 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 52 SEQUENCE 
TEST #37 = TEST THAT ‘NEW’ STATUS IS CORRECT 
855 _SBITL TEST #37 - TEST THAT "NEW'’ STATUS IS CORRECT 
RASA AAARAAAAEAAEAAAEESEEAEERERAAAAAEAEEEARARAERERAAREREARAERERHATERERERERES 
“TEST 37 - TEST THAT ‘NEW'’ STATUS IS CORRECT 
PPPOTrerrTTTTTTTTTITTTITILTILIT LiL 
007306 032737 000001 177766 iST37: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
007314 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
007316 012737 000177 000302 MOV #177,$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
0073 4 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007326 000000 HALT ‘CPU POWER BIT FOUND SET 
0073 042737 000001 177766 BIC 4 CPUERR “CLEAR THE BIT FOUND SET 
007 005237 000304 100$: INC STESIN “UPDATE TEST NUMBER 
007 2 020737 000037 600304 CMP 3 pgTESTN > SEQUENCE ERROR? 
00735 1402 BEQ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
007352 000137 007620 JMP 10068 JUMP TO ERROR HALT ON SEQ ERROR 
007356 1000$: 
856 007356 012706 000500 V #BUFF.SP 
857 007362 012737 007376 000014 MOV #4$,RTRAPS 
858 007370 005037 000016 CLR RTRAP4+2 :CLEAR FUTURE PRIORITY AND CC 
859 007374 000003 TRT ce 
7376 4$: :TEST FOR "'C’’ CLEARED 
007376 100005 BPL 5$ 
7400 012737 000143 000302 MOV #143, $F ATAL sMOVE TO MAILBOX # ‘*«eeenee 1435 sxeneee 
007406 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007410 000000 HALT °C NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
862 007412 S$: 
007412 001005 BNE 6$ 
007414 012737 000144 000302 MOV #144, $FATAL :MOVE TO MAILBOX # teense 144 tenener 
007422 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
007424 000000 HALT T CLEARED 


NOT CL 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 753 
865 eorese 6$: 


0074 102005 BVC 7$ 
0074 012737 000145 000302 MOV #145,SFATAL sMOVE TO MAILBOX # xeeeeee 145 reeneee 
007436 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
007440 000000 HALT :V NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 745 
864 007442 7$: 
907442 103005 BCC 8$ 
007444 012737 000146 000302 MOV #146, SFATAL sMOVE TO MAILBOX # teeters 146 seeeere 
007452 005212 INC (R2) > SET MSGTYP TO FATAL ERROR 
007454 000000 HALT NOT CLEARED 
:T0. SCOPE REPLACE HALT WITH 240 
AND REPLACE aed INST WITH 737 
865 007456 032737 000340 177776 8$: BIT #340,CC “TEST PRIORITY 
007464 001405 BEQ 
0074 012737 000147 000302 MOV #147,$FATAL sMOVE TO MAILBOX # seeeeee 147 eeeenee 
007474 005212 INC (R2) 7SET 4 Aes TO FATAL ERROR 
007476 000000 HALT ;PRIORITY Y NOT ZERO 
-TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 726 
867 007500 01 706 000500 9$: MOV 
868 007504 01273 00/52¢ 000014 MOV £103. ATRap 
869 007512 012737 000357 0600016 MOV 7 RTRAPGo2 :SET NEW ‘’CC’’ AND PRIORITY 


= Ae: LL LLL LLL 


ete 


CKK 11/44 TRAPS MACRO M1113 
TEST #37 = TEST THAT ‘NEW’ STATUS IS CORRECT 
870 0075 000003 
871 ORee 
ea 
$078 524 012737 000150 000302 
007532 005212 
007 
872 007536 
007536 001603 
007540 012737 000151 000302 
007546 005212 
007550 000000 
873 007 228 
007552 102405 
007554 012737 000152 000302 
007562 005212 
007564 000000 
874 007566 
0075 103405 
007570 012737 000153 000302 
007576 005212 
76 000 
875 007602 013706 177776 
876 eres 042706 000017 
877 4t4d 022706 000340 
878 007616 001405 
ithe 
007620 012737 000154 000302 
007626 005212 
007630 000000 
879 007632 012737 000016 000014 
880 007640 005057 000016 
881 
883 
884 
885 
886 
887 


10$: 


11$: 


12$: 


13$: 


14$: 


15$: 


16$: 


TRT 


11-NOV-81 10:05 PAGE 52-1 


11$ 
#150, SFATAL 
(R2) 
12$ 
#151, SFATAL 
(R2) 
13$ 
#152, SFATAL 
(R2) 
14$ 
#153, SFATAL 
(R2) 


#154, SF ATAL 
(R2) 


#16,14 
16 


;MOVE TO MAILBOX # 


; TRAP HERE 


:MOVE TO MAILBOX # seeeee2 150 
: SET MSGTYP TO FATAL ERROR 


N NOT SET 
‘To SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 707 


:MOVE TO MAILBCX # ‘*eee0e% 157 
:SET MSGTYP TO FATAL ERROR 


:2 NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 701 


sMOVE TO MAILBOX # ‘teeneee 152 
7 SET ag hag TO FATAL ERROR 


:V_NOT SE 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 673 


sMOVE TO MAILBOX # ‘*eeeee2 153 
SET ag hg TO FATAL ERROR 


:C_NO 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 


eaeanaee§ 156 
3: SET arte ts TO FATAL ERROR 

:PRIORIT Y WAS CHANGED,OR WRONG 
3T0 SCOPE REPLACE HALT WITH 240 
= AND REPLACE NEXT INST WITH 651 


;PDP-11 ILLEGAL AND ADDRESS = TEST 


[ALL INSTRUCTIONS Lacal AR E I 
; SHOULD TRAP TO 


LOCATION 10, AND THE 
:PC THAT POINTS TO THE TRAPPING INSTRUCTION 


;SHOULD BE PLACED ON THE STACK 


SEQUENCE 


eeeaneaee 


senanaane 


aaeneneee 


aeaeanae 


geaeene 


STSTNM 


62 


| CKKABDO 11/446 


4 TRAPS 


MACRO 1113 


TEST #60 = TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 
-SBTTL TEST #40 - TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


s RARER AAAAEAAAAAREEAEAAE EAE HAAAAAAAAAAEAAEHARAA RARER A ARE RAH AAA E TEES 


:TEST 40 - TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


PPPCTTOTTTITITTITITITILILLL LIL LLL LIL LLL LLL 


893 007736 


oO 
Iw 


=8 
WIMP 


NnNe~s 
AN ON 
NoNoOo™N 


sees 
BRERA Re 


— ae ee ee oe 


177766 
000302 


177766 
000304 


000010 
000302 


TST4O: 


100$: 


11-NOV-81 10: A PAGE 53 


#1, CPUERR 
iad SFATAL 


#1, CPUERR 
STESTN 

#40, $TESTN 
TST41-12 
#BUFF,SP 
#1$,RTRAP 
#155, $F ATAL 
(R2) 


SEQUENCE 


:SEE IF BIT 0 OF CPUERR ve MONITOR BIT) IS SET 
7BRANCH AROUND CLEAR AND HALT IF CLEAR 
[MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
+ SET MSGTYP TO FATAL ERROR 
POWER FOUND SET 


;UPDATE TEST 


; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 

3 STACK POINTER SETUP 
;RETURN LOCATION 

; ILLEGAL oh ae SHOULD TRAP 
:MOVE TO a tannene §=155 
:SET MSGTYP TO FATAL ERROR 

; ILLEGAL INSTRUCTION DIDN'T TRAP,OR WRONG S$STSTNM 

;TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 764 


aaneaeese 


65 


. A A CL LL 


CKKABDCO 11/44 TRAPS 
TEST #41 = TEST DEC OF 


894 


4 
WIN 
Sear 
— A 
NNO™N 


ssessscessse 

Ci hon fy 

MINEO — NWO NITION 
Re ee 
MNWUNO NO] NNN 


MACRO M1113 


000001 
000304 
000041 


177766 


000177 000302 


177766 
000304 


000500 
010016 000010 
000474 
600156 000302 


11-NOV-81 10: 93 PAGE 54 
STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


.SBTTL TEST #41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


RARE AAAEAAAAAAAAAAA ARTA TERA EAAATEAAAAAARETERRARATEREHEAEARER ARTA EARE TEES 


:TEST 41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PPPerTrTTTTTTTTITITITITI LILI LIL LiL LLL LLL 


1ST41: BIT #1, CPUERR 
BEQ 1 
MOV #177, $FATAL 
INC (R2) 
HALT 
BIC #1. CPUERR 
100$: INC STESIN 
CMP #41 pSTESTN 
BNE TST42-12 


#BUFF ,SP 
MOV #1$,RTRAP 
1$: CMP — 
MOV #156, $F ATAL 
(R2) 


;SEE IF BIT 0 OF CPUERR —_ MONITOR BIT) IS SET 
CH AR AND HALT 


:BRANCH AROUND CLEAR IF CLEAR 
:MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


:SET MSGTYP TO FATAL ERROR 
:CPU POWER B OUND 


; T 
; SEQUENCE ERROR? 


“BRANCH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 
RETURN POINTER 


“RESERVED INSTRUCTION 
; TEST DECREMENT OF SP 


sMOVE TO MAILSOX # “«eeanee 156 seeenee 
:SET MSGTYP TO FATAL ERROR 

:NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 

:AND REPLACE NEXT INST WITH 761 


64 


pore nc nnn ee mantener EEE EEE EEE EEE, 


N 5 
CKKABDO 11/44 TRAPS MACRO M1113 owas 10:05 PAGE 55 SE QUE NCE 
TEST #42 = TEST THAT PROPER P.C. IS SAVED 
900 .SBTTL TEST #42 - TEST THAT PROPER P.C. iS SAVED 


seaeeenceeeeeeaearareretereceeenanaaeananaaaeanaranaeaeaenanensaraaaaaasaes 


=TEST 42 = TEST THAT PROPER P.C. IS SAVED 


POPCTTOTTTTTTITITITILTILTITILLI LLL LLL LLL LILI 


010036 032737 000001 177766 S142: BIT #1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010044 1410 BEQ 100$ ANCH AROUND CLEAR AND HALT IF CLEAR 
010046 12737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
010054 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
010056 HALT =CPU POWER BIT FOUND SET 
010060 042737 000001 177766 BIC #1. CPUERR CLEAR THE BIT FOUND SET 
010066 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
010072 020737 000042 000304 CMP #42,$TESIN ; SEQUENCE ERROR? 
010100 001012 BNE TST43-12 CH TO ERROR HALT ON SEQ ERROR 
901 010102 012706 000500 MOV #BUFF ,SP ; STACK POINTER SETUP 
902 010106 012737 010116 000010 MOV #1$.RTRAP *RETURN FROM TRAP POINTER 
903 010114 000100 JMP RO *TRAP ON THIS INSTRUCTION 
904 010116 020737 010116 000474 1S: CMP #. BUFF <4 *CHECK FOR INCREMENTED P.C. 
905 010124 1405 BEQ TST4 
010126 012737 000157 000302 MOV #157, $F ATAL :MOVE TO MAILBOX # seeenee 157 seeenee 
0101 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
010136 000000 HALT = INCORRECT P.C.,0R WRONG $TSTNM 


>TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 760 


65 


906 
gis 
a 
a. 
itt 
010170 
010174 
010202 
907 010 
010210 
010216 
910 010222 
911 010224 
at 010 
913 010 
010 
010244 
010246 
914 010820 
915 010254 
aig 010 $ 
917 010 
918 010272 
919 010274 
920 010302 
010 
Bea, 
010314 


CKKABDO 11/44 TRAPS 


oO 
w 
NEN 
WW 
NON 


Ln fo 


srecsssccscsrescs 
~_™N on™N 


ww 
nuNuM 


ooo 
_—— = 


MNT 


sosees 
WN 

NEN PNNS 
rNMV 


MACRO M 


177996 


000476 
000160 
000500 
ate. 
000357 


000476 
000161 


1113 
TEST #43 ~- TEST THAT “OLD’’ CC AND PRI 





11-NOV-81 10:05 PAGE 56 
ARE PLACED ON STACK 


SEQUENCE 


-SBTTL TEST #43 = TEST THAT ‘‘OLD'’ CC AND PRI ARE PLACED ON STACK 


=< RAERAAAEAEAAAAAAEAAEAEEAEEREREEEARAEAEAREERERAAARERAAAREAARARAAEAAAEARAEEEAREAEREAAAEEE 


“TEST 43 - TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


REE AAEEAEAEAEEAEEEEEAAAEEAAEAARARERAEEAREREREAAREAEEAAEARAEAREREREEE 


TST43: 


100$: 


1$: 


2$: 


3$: 


#1, CPUERR 
loos 
#177, $FATAL 
(R2) 


#1, CPUERR 
STESIN 

#63, $TESTN 
TST44-12 
#BUFF.SP 
#1$,RTRAP 
CC 

RO 
BUFF-2,40 
#160, $FATAL 
(R2) 


FSP 
aah RtRap 
#357,CC 


RO 

BUFF =2 ,#357 
144 

#161, $FATAL 

(R2) 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
: H AROUND CLEAR AND HALT IF CLEAR 
OR FATAL # TO SFATAL 


> SEQUENCE ERROR? 
oon =BRANCH TO ERROR HALT ON SEQ ERROR 


;SET UP 
;CLEAR CC AND PRICRITY 


; TRAP 
; TEST THAT OLD STATUS WENT TO STACK 


sMOVE TO MAILBOX # **xeeee% 160 
:SET MSGTYP TO FATAL ERROR 


TUS 
:TO SCOPE REPLACE HALT WITH 240 
an _ NEXT INST WITH 755 


geeaenee 


SET UP 
;SET PRIORITY 
SET CC 


; TRAP 
: COMPARES STATUS ON STACK 


sMOVE TO MAILBOX # ‘**eeee8 161 
:SET MSGTYP TO FATAL ERROR 

: INCORRECT STATUS ON STACK.OR WRONG STSTNM 
sTO SCOPE REPLACE HALT WITH $39 

:AND REPLACE NEXT INST WITH 732 


geenenaene 





Fe 6 





C 
' CKKABDO 13744 TRAPS MACRO M1113 he's a 10:05 PAGE 57 SEQUENCE 
TEST #44 = TEST THAT ‘NEW’ STATUS IS CORRECT 
921 .SBTTL TEST #44 = TEST THAT ‘NEW’ STATUS IS CORRECT 
sR A AAA AAA AA AER EEA AEA AERA RAE AARAAAE RARER AARAEREAT AREA EAH EAE ARES 
= TEST 44 = TEST THAT ‘NEW’ STATUS IS CORRECT 
PPP OTP OTT TTT TTT TTI TITTLE LLL LLL LLL LLL 
010316 032737 000001 177766 TST44: ait #1, CPUERR ; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010324 Bu teTe BEQ 100$ ANCH AROUND CLEAR AND HALT IF CLE 
010326 One73 000177 000302 MOV #177, SFATAL “MOV ITOR FATAL # TO $SFATAL 
010 005212 INC (R2) : 
010 HALT 3s CPU 
010340 04 000001 177766 BIC #1, CPUERR sCLEAR THE 8 
010 00 $ 7 000304 100$: INC STESTN sUPDATE TEST 
010 Ose 7 000044 000304 CMP #44, ,$TESTN : SEQUENC 
010 1402 BEQ 1006$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
Hy 000137 010624 10008 MP TST45-12 ; JUMP TO ERROR HALT ON SEQ ERROR 
958 010 012706 000500 V #BUF F sh 
923 010372 012737 010406 000010 MOV #1$,RTR 
924 010400 005037 000012 CLR RTRAPS2 CLEAR FUTURE PRIORITY AND CC 
925 010404 000100 JMP RO oontt 
926 010406 1$: : TEST FOR *'C’’ CLEARED 
927 010406 1 5 BPL 2$ 
010410 012737 000162 000302 MOV #162,$FATAL sMOVE TO MAILBOX # ‘t8eeeee 8162 eeeeene 
010416 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
010420 000000 HALT sC NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 761 
928 010422 23: 
010422 001005 BNE 3$ 
oerts 012737 000163 000302 MOV #163.SFATAL sMOVE TO MAILBOX # setenee 165 seeeren 
0104 005212 INC (R2) sSET MSGTYP TO FATAL ERROR 
010434 000000 HALT =2 NOT CLEARED 
>TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 753 
929 010436 3$: 
010436 102005 BVC 4$ 
010440 012737 000164 000302 MOV #164, SFATAL :MOVE TO MAILBOX # *eeeeee 164 eeeener 
010446 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
010450 000000 HALT :V NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
: AND REPLACE NEXT INST WITH 745 
930 0103s 4$: 
010452 103005 BCC 5$ 
010454 012737 000165 000302 MOV #165 ,SFATAL sMOVE TO MAILBOX # xeeenree 165 teeneee 
010462 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
010464 000000 HALT iC T 
TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 737 
44 010466 032737 000357 177776 S$: BIT #357,CC > TEST PRIORITY 
932 010474 001405 BEQ 
010476 or eas 000166 000302 MOV #166,$F ATAL sMOVE TO MAILBOX # xeeenee 166 eeeeeee 
010504 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
010506 000000 HALT :PRIORITY 


OR NOT ZERO 
:TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 726 


010510 01 706 000500 6S: MOV BUFF 
934 010514 0127 010532 000010 MOV RT BAP 
935 010522 01 357 000012 MOV Hae RTRAP+2  :SET NEW "'CC’’ AND PRIORITY 


ee eee re ee ee — 


—- 


CKKABDO 11/44 TRAPS MACRO M1113 e's a 10:05 
TEST #44 = TEST THAT "NEW'’ STATUS IS CORRECT 


0105 000100 JMP 
3 0105 7$: 
0105 10003 BMI 
0105 Ore? 7 000167 000302 MOV 
010542 005212 INC 
010544 HALT 
938 010546 8$: 
ats 001405 BEQ 
010550 012737 000170 000302 MOV 
010556 005212 INC 
010560 000000 HALT 
939 010 9$: 
105 102405 BVS 
010 012737 000171 000302 MOV 
010572 005212 INC 
010574 000000 HALT 
940 010576 10$: 
010576 103405 BCS 
010600 012737 000172 000302 MOV 
010606 005212 INC 
610610 000000 HALT 
941 010612 013706 177776 11$: MOV 
4 010616 022706 000357 CMP 
943 010622 001405 BEQ 
Opts 012737 000173 000302 MCV 
010632 005212 INC 
010634 HALT 








PAGE 57-1 
RO 


8$ 

#167, SFATAL 
(R2) 

9$ 

#170, $FATAL 
(R2) 

10$ 

#171, $FATAL 
(R2) 

11$ 

#172, $FATAL 
(R2) 


CC, SP 
#357,SP 
TST4 
#173, $F ATAL 
(R2) 


a a e+ 


6 


: TRAP HERE 
MOVE TO MAILBOX # ‘«*#eeee% 167 
»SET MSGTYP TO FATAL ERROR 
N NOT SET 
To SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 707 
sMOVE TO MAILBOX # ‘*#eee0% 170 


:SET MSGTYP TO FATAL ERROR 


:Z NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 701 


:MOVE TO MAILBOX # ‘*saeneee =171 


: SET gag TO FATAL ERROR 


7V 
;TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 673 


:MOVE TO MAILBOX # ‘**eee"% 172 


;SET MSGTYP TO FATAL ERROR 
T SET 


:C NO 
:TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 665 


sMOVE TO MAILBOX # ‘*xeanxee 173 


:SET MSGTYP TO FATAL ERROR 


eeennee 


ageennee 


SaRKEES 


SeeKeee 


2e2annne 


;PRIORITY WAS CHANGED,OR WRONG STSTNM 


TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 653 


SEQUENCE 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 58 SEQUENCE 69 
TEST #45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 


944 .SBTTL TEST #45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 


SERRE E AEA AAAAA AREA AEEAAEREREAERA EAE AREA AAAARAERERAAARERAE AERA ERRAEEEEE EES 


:TEST 45 = TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 


WPPTTTOTTTITITITILILIL LLL ILE LLL LLL LLL LLL LLL LLL 


3 
S 






010636 032737 000001 177766 S145: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010644 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
010646 01275 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POUER MONITOR FATAL # TO SFATAL 
010694 21 INC (R2) ;SET MSGTYP TO FATAL ERROR 
01 HALT -CPU POWER BIT FOUND SET 
010660 04 900001 177766 BIC #1, CPUERR =CLEAR THE BIT FOUND SET 
01 005237 000 100$: INC STESIN ‘ OBDATE TEST 
01 022 7 000045 000304 CMP #45, $TESIN ; SEQUENCE ERROR? 
01 1006 BNE TST46-12 CH TO ERROR HALT ON SEQ ERROR 
945 010702 O12 06 000500 MOV #BUFF SP : STACK POINTER SETUP 
946 010706 012737 010730 000010 MOV #1$,RTRAP “RETURN LOCATION 
947 010714 004000 JSR RO,RO “RESERVED INS, SHCULD TRAP 
948 010716 Ong 37 000174 000302 MOV #176, $FATAL :MOVE TO MAILBOX # xeeeeee 174 teneeee 
010726 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
10726 PALT “DIDN'T TRAP,OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 24 0 
“AND REPLACE NEXT INST WITH 764 
949 010730 1$: 


——- eee 


r- 


CKKABDO 11/44 TRAPS 
TEST #46 = TEST DEC OF 


950 


© 
Ww 
NNON 


Vinh 


S 
sos 





NNN 


1 


NVNON UN 


Ne 


$8 
RES 
S 


SIGS. 
UEWN— 
OoCoooooooooooooo 


Ok ed ed ed od od od dd od 
Nm 
ALALO 

UNS 

—WO 

muNVIN 


MACRO M1113 11-NOV-81 10: 2, PAGE 59 
STACK POINTER ON A TRAP OPERATION 


177766 
000302 


177766 
000304 


000010 


000302 


SEQUENCE 


-SBTTL TEST #46 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


FREER EAE RARER EEAE EEE E EERE AAAEAEEAAEAREARERAARAEARAEAEREAO RA ER EAE A ES 


:TEST 46 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PP OTTTTTTTTITTIT TITLE LLL LLL LLL LULL LLL LLL 





S146: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 1 ; CH AROUND CLEAR T IF CLE 
MOV #177, $FATAL :MOVE SPECIAL TOR FATAL # TO SFATAL 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT =CPU P BIT F 
BIC #1, CPUERR CLEAR THE BIT FOUND SET 

100$: INC TESTN -UPDATE TEST 
CMP #46 STESTN >SEQUENCE ERROR? 
BNE sT47-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
MOV yBUF F “35 : STACK POINTER SETUP 
MOV #1$,RTRAP *RETURN POINTER 
JSR RO,RO “RESERV VED. i NS 

1$ CMP SP -ABUFF~4 -TEST DECREMENT OF SP 
MOV #175, $FATAL :MOVE TO MAILBOX # ‘*eeaxee 175 seeeeee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 

-TO SCOPE REPLACE HALT WITH 240 


ZAND REPLACE NEXT INST WITH 761 


70 


oe ee <—— 





CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 60 SEQUENCE 
TEST #47 = TEST THAT PROPER P.C. IS SAVED 
956 -SBTTL TEST #47 = TEST THAT PROPER P.C. IS SAVED 


SERA AERAEEEEAREAEAREAEEREAAAEAEEAERERAE RARER AA ERERAERAEAERERAEEEAREAE RARER NES 


:TEST 47 = TEST THAT PROPER P.C. IS SAVED 


PPOTTT TTT TTI TITTLE LLL LLL LLL LLL LLL iii iii 






011030 032737 000001 177766 S147: BIT #1. CPUERR ‘sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011036 001410 BEQ 106$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
011040 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
011046 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
011050 900000 HALT PU POWER BIT FOUND SET 
011052 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
011060 005237 000304 100$: INC STESIN “UPDATE TEST NUMBER 
011064 022737 000047 000304 CMP #47, $TESTN = SEQUENCE ERROR? 
011072 001012 BNE TST50-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
957 011074 012706 000500 MOV #BUFF ,SP :STACK POINTER. SETUP 
958 011100 012737 011110 000010 MOV #1$,RTRAP ;RETURN F ROM TRAP POINTER 
959 011106 004 JSR RO,RO TRAP ON THI 
960 011110 022737 011110 000474 1S: CMP #1$, BUFF =4 “CHECK FOR INCREMENED P.C. 
961 011116 001405 BEQ T5 
011120 012737 000176 000302 MOV #176, SF ATAL :MOVE TO MAILBOX # eee 176 eeeener 
011126 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
011130 000000 HALT E 


; INCORRECT P.C.,OR WRONG S$TST 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


e 


ee 


— ee 


H 6 


-————_——— epemmensymmpiitameasasil 


CKK 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 61 SEQUENCE 


TEST #50 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


es 


963 _SBTTL TEST #50 = TEST THAT "‘OLD'’ CC AND PRI ARE PLACED ON STACK 
FERRARA A ARERR REREREREEEE EEE RE EEAARERERERRERERERERARAEREAEARREEEEERAEEE ES 
“TEST 50 - TEST THAT “‘OLD'' CC AND PRI ARE PLACED ON STACK 
POPP TOeTTTTOTTTTITITIITILITLL LLL LE LLL LLL LLL 
011132 032737 000001 177766 *ST50: BIT #1.CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011140 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CL 
011142 012737 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
011150 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011152 HALT >CPU POWER BIT FOUND SET 
011154 0427 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
011162 005237 000304 100$: INC TESTN “UPDATE TEST NUMBER 
011166 022737 000050 000304 CMP #50.$TESTN * SEQUENCE ERROR? 
011174 001040 BNE TST51-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
964 011176 012706 000500 MOV #BUFF .SP :SET UP 
965 011202 012737 011220 000010 MOV #1$.RTRAP “SET UP 
966 011210 005037 177776 CLR cc “CLEAR CC AND PRICRITY 
96 011214 257 CCC 
968 011216 004000 JSR RO.RO : TRAP 
969 011220 023727 000476 000000 1$: CMP BUFF -2,#0 “TEST THAT OLD STATUS WENT TO STACK 
970 011 26 001405 BEQ 
011230 012737 000177 000302 MOV #177, $FATAL :MOVE TO MAILBOX # *#eeeee 177 sxeeeee 
011236 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011240 000000 HALT ; INCORRCT STATUS 
TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
971 011242 012706 000500 2$: MOV #BUFF «SP “SET UP 
972 011246 012737 011266 000010 MOV #3$ RTRAP “SET UP 
973 011254 012737 000357 177776 MOV #357,CC “SET PRIORITY 
$s Suisse Bebop ss nono Hie 
976 011266 023727 000476 000357 3S: CMP BUFF -2,4357 “COMPARES STATUS ON STACK 
977 011274 001405 BEQ TST51 
011276 012737 000200 000362 MOV #200, SFATAL :MOVE TO MAILBOX # seexxee 200 eeeeees 
011304 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011306 000000 HALT “INCORRECT STATUS ON STACK,OR WRONG STSTNM 
“TO SCOPE REPLACE HALT WITH 240 


:AND REPLACE NEXT INST WITH 732 


oe = 


44 TRAPS 


—_—_—————— Oe eee ae A  — amr 


MACRO M1113 Li's ml 10:05 PAGE 62 


SEQUENCE 


T #51 = TEST THAT ‘NEW’ STATUS IS CORRECT 


978 


ees 
FNVFONSOO 


Ware 
SxS 


Nes 


S 
o 


 ) 
SSLESS 
OOO OCQOOCOOOOOCOOCOCOCOCOOOCOO 


ce ec et ce el ce ee ceed ed ed nd et 


ce ce ce ee re ee ee el ee ee ee ee eed eed ed 


~— © 


g 


‘alololol—) 
ad aed ood od 
ek eet ed eed 
PRRLS 
mn 
ARARS 


- 


oOo0°°o 
ed aed ood ed ed 


33 
Oo 
oOoCoo 


ecss 
Ow 
r= 
NEN 
Wl Ww 
NON 


4 
WOU 


SWrON™N 


—NvVIP 
= IN 


S 


Sans 
ww 
~_™N 


Sas 
monn 


000001 
000177 


000001 
000304 
000051 
011614 
000500 
011400 
000012 


000201 
000202 
000205 


000204 


177766 
000592 


177766 
000304 


000010 


000302 


000302 


000302 


000302 


000302 


000010 
000012 


-SBTTL TEST #51 = TEST THAT “NEW'’ STATUS IS CORRECT 


5 EEE AAAAAAAAAEEAAAEAE RETA EEERERERREREAEEEEEREAEAREEAEAREARERERERAEEE ERASE 


:TEST 51 - TEST THAT ‘‘NEW'’ STATUS IS CORRECT 


Peer TeTTTTTTTITITI TILT TILE LLL LL LLL LL LLL ici iii iii 


iST51: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR 








| (POWER MONITOR BIT) IS SET 
BEO 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “CPU POWER BIT FOUND SET 
BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
100$: INC STESTN ‘UPDATE TEST NUMBER 
CMP #51,$TESTN > SEQUENCE ERROR? 
BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
—_ JMP TST52-12 : JUMP TO ERROR HALT ON SEQ ERROR 
V #BUFF .SP 
MOV #1$,RTRAP 
CLR RTRAP+2 :CLEAR FUTURE PRIORITY AND CC 
JSR RO,RO 
1$: ve ne :TEST FOR ‘'C’’ CLEARED 
MOV #201. $FATAL :MOVE TO MAILBOX # *#eeeee 201 xeeeeee 
INC (R2) “SET MSGTYP TO FATAL E 
HALT *C NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
- ‘AND REPLACE NEXT INST WITH 761 
BNE 3$ 
MOV #202,SFATAL :MOVE TO MAILBOX # *eee008 202 «eeenee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT 72 NOT CLEARED 
:TO SCOPE REPLACE HALT WwW H 24 0 
- “AND REPLACE NEXT INST WITH 753 
BvC 4$ 
MOV #203, $FATAL :MOVE TO MAILBOX # seeeeee 203 eeeeeee 
INC (R2) “SET MSGTYP TO FATAL E 
HALT :V NOT CLEARED 
:19. SCOPE REPLACE HALT WITH 240 
- AND REPLACE NEXT INST WITH 745 
BCC 5$ 
MOV #204. $FATAL :MOVE TO MAILBOX # teeeeee 204 senneee 
INC (R2) ‘Se! MSGTYP TO FATAL ERROR 
HALT NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
REPLACE NEXT INST WITH 737 
5$: MOV CC,RO TORAGE 
MOV #205, $F ATAL sMOVE TO MAILBOX # teteeee 205 eexeeee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “PRIORITY NOT ZER 
:19 SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 727 
6S: MOV #BUFF , “SP 
MOV #7$,R 


MOV a5) RTRAPS2 :SET NEW ‘'CC’’ AND PRIORITY 


73 


& — zzz uae DLL LLL LLL LLL LL LLL 


PAGE 62-1 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV~81 10:05 
TEST #51 = TEST THAT “WEW’* STATUS IS CORRECT 


993 011388 004000 JSR 
994 0115 § 7$: 
0115 100405 BM] 
011524 LET 000206 000302 MOV 
011552 005212 INC 
011534 000000 HALT 
995 011536 8$: 
011536 001405 BEQ 
011540 012737 000207 000302 MOV 
011546 005212 INC 
011550 000000 HALT 
996 011552 9$: 
011552 102405 BVS 
011554 012737 000210 000302 MOV 
011562 005212 INC 
011564 000000 HALT 
997 011566 10$: 
011566 103405 BCS 
011570 012737 000211 000302 MOV 
011576 005212 INC 
011600 000000 HALT 
998 011602 013700 177776 11$: MOV 
999 011606 022700 000357 CMP 
1000 011612 001405 BEQ 
011614 012737 000212 000302 MOV 
011622 005212 INC 
011624 000000 HALT 
1001 


RO,RO 


8$ 
#206,$FATAL 
(R2) 

9$ 

#207, SFATAL 
(R2) 


10$ 
#210,$FATAL 
(R2) 


T 
#212, $SFATAL 
(R2) 


A 


J 6 


; TRAP HERE 


sMOVE TO MAILBOX # s#aeane 206 
a ag hg TO FATAL ERROR 


NOT SE 
‘To SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 710 


s;MOVE TO MAILBOX # *eaanee 207 
:SET ae ht TO FATAL ERROR 


‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 702 


s;MOVE TO MAILBOX # ‘**aaee"% 210 
7 SET ag hg TO FATAL ERROR 


V_NO 
‘Yo SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 674 


sMOVE TO MAILBOX # ‘*eeeee" 211 
7 SET ag hg TO FATAL ERROR 


:C NOT SE 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 666 


sMOVE TO MAILBOX # ‘teeunee 212 
7 SET “yy ge TO FATAL ERROR 

:PRIORITY WAS CHANGED,OR WRONG 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 654 


SEQUENCE 74 


ganaeerane 


xeeeenene 


Reaeeee 


a£eeaetaene 


2geaaeaee 


STSTNM 


TE 
———e Ee ee 


ee 11/44 TRAPS 


ao 


ORO 


gergses 


~~ 
388 
We Ww 
ole lejlelelelelelelelelealelo]o) 
ao o 
RUSNGRSEST 
sogsss 


ce cl ee el el eed eel eel ee eed 
UN =n 


NNN NOAOO 


ee ee et ee ee ee eed eed eed ed 
— —- 
ny 


—) od wd od = 


oO 
Ww 
Wn fo 
NEN 
— iN 
MmNON 


i PR Sa 
—NOWWN ES AW 
NNVNNON™N 


MACRO M111 
ST #52 = TEST THAT A TRAP OCCURE 


000001 
000177 


900001 
000304 
000052 
177766 
177766 


000213 


000500 
011746 
000001 
000214 


000100 


000215 


177766 


—- — - 


3 
S 


177766 
000302 


177766 
000304 


000302 


000004 
000302 


000502 
000502 
000502 


000302 


1 
ON 


1-NOV-81 10:05 PAGE 63 
AN ILLEGAL ADDRESS 


-SBTTL TEST #52 - TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


ERA AAAAAAARARAAAAAAREREAE AEE AE RARER AERARAAAAERE RARER AERARARER AR EHAEEEAEES 


:TEST 52 - TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


PPPerrTrTrTTTITTITITITITILTI LITT LLL LL LLL LLL LLL LLL LLL LLL 


TST52: 


100$: 


1$: 


2$: 


3$: 


4$: 


+ CPUERR 
#177, SFATAL 
(R2) 


#1, CPUERR 

TESTN 
#52, $TESTN 
3$ 


CPUERR 
— 


$ 
#213, SF ATAL 
(R2) 


#BUFF ,SP 

ee iilcmeate 
#214, $F ATAL 
(R2) 


CPUERR ,RCPUER 
K ,RCPUER 


#CERMSK 
a RCPUER 


#215, SFATAL 
(R2) 


CPUERR 


:MOVE TO 
2 SET MSGTYP TO FATAL E 
GAL R 


SEQUENCE 


7 SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
OUND CLEAR AND HALT IF CLEAR 

“MOVE IAL POWER MONITOR FATAL # TO SFATAL 

: SET MSGTYP To Behe L ERROR 


O ERROR HALT ON SEQ ERROR 
AR CPU ERROR REGISTER 
“VERIFY THAT IT CLEARED 


sMOVE TO MAILBOX # ‘*aea%a8 

:SET MSGTYP TO FATAL ERROR 

> CPU ERROR REG FAILED TO CLEAR 

-TO SCOPE REPLACE HALT WITH 240 

* AND REPLACE NEXT INST WITH 765 

:STACK POINTER SETUP 

“RETURN LOCATION 

: ILLEGAL ADDRESS INS - SHOULD TRAP 
MAILBOX 


aeaanzeex 214 


gaancenee 


213 


eeean ae 


RROR 
rar DID NOT TRAP 
“AND REPLACE NEXT INST WITH 751 
;READ AND SAVE CPU ow REGISTER 


:MASK OFF UNUSED BITS OF CPU ERROR REG 
;0DD ADDRESS BIT SET? 


gkeneagese 


OR WRONG STSTNM 


sMOVE TO MAILBOX # **#eeee"e 215 
:SET MSGTYP TO FATAL ERROR 
SINCCRRECT CPU ERROR REG a le 
:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 732 
;CLEAR ODD ADDRESS BIT 


-_—----—------—- ————----— — 


75 


————=E 
ine 
eee 


Sania 


— ee 


“Tesi 


TRAPS 


a3. ~- TEST DEC OF 


1/44 
1017 
Oisete 
012016 
012070 
0120 
0120 
0120 
01204 
012044 
012052 
1018 012054 
1019 012060 
19s Bis 
1021 0120 
1022 012076 
BIS ibe 
012106 
012110 


Ww 
mNoOonN 


NN YONG 
yNN 


Nose 
VIAN 


MACRO M1113 


177766 
000302 


177766 
000304 


000004 


009302 


11-NOV-81 10: oS PAGE 64 
STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


-SBTTL TEST #53 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


FRAAAAAAEAARAREATAAAAAEKAAAAKAAAAAAAAARAARARAAAKARAAAAKAAAAAAA AAA AEA AH AAAeS 


:TEST 53 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


POPP TOTTITITTTIITI TTI TLL LLL LLL LLL 


iST53: 


100$: 


eae 


#1, CPUERR 
100$ 
#177,SFATAL 
(R2) 
#1, CPUERR 
$T ES! N 
s STESTN 
S34 4-12 
pauF FSP 
#18 RTRAPS 
SP ,ABUFF-4 
#216,$FATAL 
(R2) 


:SEE IF BIT 0 OF CPUERR (POWER MONITOR BiT) IS SET 
7BRANCH AROUND CLEAR AND HALT IF CLEAR 
sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


“SET MSGTYP TO FATAL ERROR 

Py IT FOUND SET 
“CLEAR THE BIT FOUND SET 

‘UPDATE TEST NUMBER 

; SEQUENCE ERROR? 

CH TO ERROR HALT ON SEQ ERROR 

; STACK POINTER SETUP 

“RETURN POINTER 

“RESER 


VED INS 
;TEST DECREMENT OF SP 


sMOVE TO MAILBOX # “ae 216 
7 SET ep bee Wy FATAL ERR 


ganaanae 


REPLA 
“AND REPLACE NEXT INST WITH 760 


cee = oe oe ee Oe a ee ee 


76 


> <<. 


—_—— - —_—-_— 


La 
CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 65 SEQUENCE 
TEST #54 = TEST THAT PROPER P.C. IS SAVED 


1023 -SBTTL TEST #54 = TEST THAT PROPER P.C. iS SAVED 


SR AAAAAAAAAARAAAAAAARAAAAEAAEAAERAAAKKRAKARARAKARKRAR ARH AHA RARER AAA Ae TATA TA ee 


: TEST 54 = TEST THAT PROPER P.C. IS SAVED 


RARER RERARAEAEAAEAEAAAAERERERARERERARAAAAERAAEAKRKEKRAKRAAKARAARAHAH AA 


O1g 136 032737 000001 177766 TST54: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012120 001410 BEQ 100$ ;BRANCH AROUND CLEAR AND HALT IF CLEAR 
gis 1§6 012737 000177 0003502 MOV #177, SFATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
aed 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
012132 000000 HALT :CPU POWER BIT FOUND SET 
012134 042737 000001 177766 BIC #1,CPUERR ;CLEAR THE BIT FOUND SET 
012142 005237 000304 100$: INC STESTN ; UPDATE TEST ER 
Oise 022737 000054 000304 CMP #54 STESTN ; SEQUENCE ERROR? 
012154 001013 BNE TST55-12 ;BRANCH TO ERROR HALT ON SEQ ERROR 
1024 012156 012706 000500 MOV #BUFF ,SP STACK POINTER SETUP 
1025 012162 012737 012174 000004 MOV #1$,RTRAPS ;RETURN FROM TRAP POINTER 
1026 012170 005737 000001 TST 1 ; TRAP ON THIS INSTRUCTION 
1027 012174 022737 012174 000474 18: CMP #1$ BUFF -4 ;CHECK FOR INCREMENTED P.C. 
1028 012202 001405 BEQ TST 
012204 012737 600217 000302 MOV #217, $FATAL ;MOVE TO MAILBOX # ‘seaenee 217 seeenen 
012212 005212 INC (R2) ;SE1 MSGTYP TO FATAL ERROR 
012214 900000 HALT INCORRECT P.C.,0R WRONG STSTNM 


;TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 757 


TEST @# 


CKK 11/44 
1029 
012216 
01 $ 4 
012226 
01 
01 
012260 
012246 
012252 
012260 
1030 012262 
1031 012264 
012272 
012274 
1032 012276 
1933 01 $69 
Oe¢ 01 ay, 
1035 012314 
18 Grea 
1088 019350 
01233 
01234 
012342 
1039 01 sec 
1040 012350 
1041 012356 
10°4 01 
10435 Q1 
1044 0123 
1045 012400 
012402 
012410 
012412 


TRAPS 


Soa 
—~rh 


Su 


ooo 


MACRO 1113 


000500 
012372 
000357 


000001 
000476 


000222 


177766 
000302 


177766 
000 304 


000302 


000004 


000000 
000302 


TST5S: 


100$: 


90$: 


1$: 


2$: 


3$: 


11-NOV-81 10:05 PAGE 66 
5S = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


SEQUENCE 


TEST #55 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


peaeaerareaeaeeeeeatereetererearageeaaneaneaeanenaeanareasaneanaaeeaaaaeeas 


:TEST 55 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


PPPPTTTTTTITTITITITITILIVILLTILIL LLL 


#1, CPUERR 

bag SFATAL 

#1, CPUERR 

$T ES STN 

#55 STESTN 
1S756-1 

90S 

#220, $FATAL 

(R2) 


#BUFF ,SP 
| ria 


1 

BUFF -2,4#0 
#221, $FATAL 
(R2) 


#BUFF.SP 
#3$ .RTRAPS 
#357,CC 


1 
eae 
#222, $F ATAL 
(R2) 


—_ MONITOR BIT) IS SET 
AND HALT IF 


; SEE r BIT 0 OF CPUERR 
H AROUND CLEAR CLEAR 
Ly FATAL # TO SFATAL 






> SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 
; BRANCH OVER wy ERROR CODE 


— 220 steneee 


O SCOPE REPLACE E HALT WIT " oN 
:AND _— NEXT INST WITH 771 


;SET UP 
:CLEAR CC AND PRIORITY 


3; TRAP 
: TEST THAT OLD STATUS WENT TO STACK 


sMOVE TO MAILBOX aeneeee 22] eeeeeee 
:SET MSGTYP - FATAL ERROR 
s INCORRECT STATUS 


:TO SCOPE REPLACE HALT WITH 240 
: AND _ NEXT INST WITH 746 


:SET UP 
“SET PRIORITY 
:SET cc 


: COMPARES STATUS ON STACK 


sMOVE TO MAILBOX # seee2e2 222 
:SET MSGTYP TO FATAL ERROR 
: INCORRCT STATUS ON STACK,OR WRONG STSTNA 
:10 SCOPE REPLACE HALT WITH 240 

AND REPLACE NEXT INST WITH 722 


eeeanese 


78 


es 





-———— 





CKKABDO 11/44 TRAPS M1113 11-NOV-81 10:05 PAGE 67 SEQUENCE 
TEST #56 = TEST THAT NeW ST ATU S 1S CORRECT 
1046 _SBITL TEST #56 - TEST THAT ‘NEW'’ STATUS IS CORRECT 
{ERA EAAEEARAEE EAA EA ARETE AA AARAAARAREARERERERERE AREER TERRA REE EAE H ETS 
“TEST 56 - TEST THAT "'NEW'’ STATUS IS CORRECT 
POST OTT TT TOTTI TTT TITTLE LLL LLL. 
012414 000001 177766 {TST5S6: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012422 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
0124 4 000177 000302 MOV #177, $FATAL > MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
012432 INC (R2) “SET MSGTYP TO FATAL ERROR 
0124 HALT =CPU POWER BIT FOUND SET 
012436 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
012444 000304 100$: INC ESTN “UPDATE TEST NUMBER 
012450 000056 000304 CMP #56, $TESTN =SEQUENCE ERROR? 
012456 BEQ 1000$ SBRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF Ok 
012460 012726 JMP TST57=12 > JUMP TO ERROR HALT ON SEQ ERROR 
012464 1000$: 
1047 012464 000500 MOV #BUFF , SP 
1048 012470 012506 000004 MOV #1$,RTRAPS 
1049 0124676 000006 CLR RTRAP5+2 :CLEAR FUTURE PRIORITY AND CC 
1050 012502 000001 TST 1 TR 
1051 012506 1$: “TEST FOR "'C’’ CLEARED 
1052 012506 BPL 2$ 
012510 000223 000302 MOV #223, $F ATAL sMOVE TO MAILBOX # teexexe 223 seeneee 
012516 INC (R2) *SET MSGTYP TO FATAL ERROR 
012520 00000 HALT ¢ NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 760 
1053 012522 2$: 
012522 BNE 3$ 
012524 000224 000302 MOV #224,$FATAL sMOVE TO MAILBOX # ‘*exenee 224 eeeneee 
012532 INC (R2) *SET MSGTYP TO FATAL ERROR 
012534 00000 HALT 2 NOT CLEARED 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 752 
1054 012536 3$: 
012536 BVC 4$ 
012540 000225 000302 MOV #225 ,$FATAL :MOVE TO MAILBOX # seeexee 225 xeeenes 
012546 INC (R2) ‘SET MSGTYP TO FATAL ERROR 
012550 HALT :V¥ NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 744 
1055 012552 4$: 
012552 BCC 5$ 
012554 000226 000302 MOV #226, $FATAL “MOVE TO MAILBOX # exeeeee 226 reeeene 
012562 INC (R2) >SET MSGTYP TO FATAL ERROR 
12564 HALT 7C NOT CL 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 
1056 012566 000357 177776 5S: BIT #357,CC “TEST PRIORITY FOR Z 
1057 012574 BEQ 
012576 000227 000302 MOV #227, SFATAL :MOVE TO MAILBOX # teeeeee 227 eeeeers 
012604 INC (R2) : SET MSGTYP TO FATAL ERROR 
012606 HALT PRIORITY NOT ZERO 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 725 
1058 012610 000500 6$: MOV #BUFF 
1059 012614 012634 000004 MOV RTRAPS 
1060 012622 000357 000006 MOV anes RTRAPS+2 ;:SET NEW “‘CC’’ AND PRIORITY 


ne eee eer eh 


—- 





a 
CKK 11/44 TRAPS MACRO M1113 L's aad 10:05 PAGE 67-1 SEQUENCE 
TEST #56 - TEST THAT "NEwW’’ STATUS IS CORRECT 
1061 012630 005737 000001 TST 1 : TRACE HERE 
1062 0126 7$: 
0126 100405 BMI 85 
0126 0127 7 000230 000302 MOV #230, $F ATAL sMOVE TO MAILBOX # «eeeeee 230 seeeeee 
012644 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
012646 HALT *N NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 705 
1063 012650 as: 
012650 001405 BEQ 9$ 
012652 012737 000231 000302 MOV #231, $FATAL :MOVE TO MAILBOX # seeeaex 23] seeneee 
01 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
012662 0600000 HALT T SET 
>TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 677 
1064 012664 9$: 
012664 102405 BVS 10$ 
012666 012737 000232 000302 MOV #232, $F ATAL :MOVE TO MAILBOX # ‘*e#exeee 232 sennene 
012674 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
012676 000000 HALT VY NOT SET 
‘To SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 671 
1065 012700 10$: 
012700 103405 BCS 11$ 
012702 012737 000233 000302 MOV #233, $FATAL <MOVE TO MAILBOX # *eeeeee 233 seennes 
012710 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
012712 000000 HALT *C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 663 
1066 012714 013700 177776 11$: MOV cc RO 
1067 012720 022700 000357 CMP #357,RO 
1068 012724 001405 BEQ TST57 
012726 012737 000234 000302 MOV #234, SFATAL :MOVE TO MAILBOX # teeexee 234 seneene 
0127 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
012736 000000 HALT “PRIORITY WAS CHANGED,OR WRONG $TSTNM 


T 
:TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 651 





a i ae ore i ew ee 


| D 7? 


CKK 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 —— 68 SEQUENCE 81 
TEST #57 = TEST THAT DEC R6 TO A VALUE LESS 400 TRAP 
1069 -SBTTL TEST #57 - TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


{EAA EAEAAAAAAAAAAARAEAEEAEAE AAAS TRERAAERAAAERAREAAREEAEREAERERAEAE EE EAERES 


:TEST 57 - TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


PPPeTreTT TTT OT ITITITILI LILI LLL LLL LE LLL LLL iii ii 






01 177766 S157: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
01 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CL 
01 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL @ 10 SFATAL 
01 INC (R2) :SET MSGTYP TO FATAL ERROR 
01 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
01 100$: INC STESIN “UPDATE TEST NUMBER 
01 000304 CMP #57,$TESTN = SEQUENCE ERROR? 
01 BNE 2$ “BRANCH TO ERROR HALT ON SEQ ERROR 
1070 01 CLR CPUERR “CLEAR CPU ERROR REGISTER 
1071 ot MOV #150,R6 *R6 = 150 
1078 1 000004 MOV #1$,4 ;STACK OVERFLOW TRAP POINTER 
107 or TST ~(R6) “WITH R6 = 150 SHOULD 
1074 01 000302 MOV #235,,SFATAL “MOVE TO MAILBOX # eeeanee 235 saeeeee 
013032 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
013034 000000 HALT “SHOULD HAVE TRAPPED,OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 762 
1075 013036 1$: 
1076 013036 013737 177766 000502 OV CPUERR,RCPUER  ;SAVE CPU ERKOR REGISTER 
1077 013044 042737 177413 000502 BIC ACERMSK,RCPUER :MASK OFF UNUSED CPU ERROR REG BITS 
1078 013052 022737 000004 000502 CMP #4 RCPUER 71S YELLOW ZONE BIT SET? 
1079 013066 001405 m BEQ 3$ 
01 012737 000236 000302 MOV #236, $FATAL :MOVE TO MAILBOX # teeeeee 236 eeneree 
0130 0 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
013072 0 HALT : INCORRECT CPU ERROR REGISTER CONTENTS, OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 743 
1080 013074 005037 177766 3$: CLR CPUERR “CLEAR YELLOW ZONE BIT 


on 


em ee 
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1081 
at 
a 
01311 
0131 
0131 
0131 
0131 
abe 
ge Bi 
084 013156 
085 013160 
086 AES 
01 196 
013174 
013176 
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—_—_———— ee ee 
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CKKABDO 11/44 TRAPS 
TEST #60 - TEST FOR DEC 


1 
000304 
000060 

150 
013160 
000142 
000237 


000302 


SEQUENCE 


-SBTTL TEST #60 - TEST FOR DEC OF R6 ON OVERFLOW TRAP 


FERRARA REA AAAAA RARE EAE EETAAAEAATAERERARERARARARAEAEREREAARAEEA REAR ERATE 


:TEST 60 - TEST FOR DEC OF R6 ON OVERFLOW TRAP 


PST OTT TTT TTITITI TLL LLL LLL LLL LLL LLL LLL 





ST60: BIT “" CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 17 CH AROUND CLEAR AND HALT IF CLEAR 
MOV “1  SFATAL MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
HALT 
BIC #1, CPUERR 

100$: INC STESTN 
CMP #60,$TESTN ‘SEQUENCE ERROR? 
BNE TST61-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
MOV #150,R6 :R6 = 150 
MOV #1$,4 ‘TRAP POINT 
TST ~(R6) “WITH R6 = 580 SHCULD TRAP 

1$: CAP R6 #142 “DID R& DECREMENT 
MOV #237 ,$FATAL sMOVE TO MAILBOX # ‘*eeee02 237 seaeene 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT *R6 NOT = 142,0R WRONG STSTNM 


;T0 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


82 
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CKKABDO 11/44 TRAPS MACRO M1113 my A 10:05 PAGE 70 SEQUENCE 


TEST #61 =~ TEST DIFFERENT TYPES OF OVERF 






1087 _SBITL TEST #61 - TEST DIFFERENT TYPES OF OVERFLOW 
sR AAAA AAA ARERR AERA EERE AAA AE AERA AREER EREREREREE EERE AEAEREAEAA ARETE ES 
“TEST 61 - TEST DIFFERENT TYPES OF OVERFLOW 
PPOrrerrrrreTr TTT TTTTTTITITTITI TLL LILLIA LILLE LL 
013200 032737 000001 177766 TST61: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
013206 001410 BEQ CH AROUND CLEAR AND HALT IF CLEAR 
013 10 012757 000177 000302 MOV #177. SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
013216 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
013220 000000 HALT Py IT FOUND SET 
01 é 2 O42 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
01 00 é 7 000304 100$: INC STESTN “UPDATE TEST 
1 : 022 7 000061 000304 CMP #61 STESTIN = SEQUENCE ERROR? 
013242 001043 BNE TST62=1 =BRANCH TO ERROR HALT ON SEQ ERROR 
1088 013244 012706 000150 MOV Wer8 eRe 
1089 013250 905037 00014 CLR 146 :STATUS WORD OF LOC 10 
1090 013254 012737 013264 000004 MOV #1$,4 “RETURN TO LOC 4 
1091 013262 005246 INC ~(6) 
1098 013264 005737 000146 1$: TST 146 
1093 013270 001005 BNE 2$ 
013972 012737 000240 000302 MOV #240, $FATAL :MOVE TO MAILBOX # t#eeeee 240 seeeeen 
013 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
013302 000000 HALT ; INCREMENT OPERATION NOT INHIBITED 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 757 
1094 013304 012705 001000 2$: MOV #1000,R5 
1095 013310 012706 000400 MOV #400,R6 
1096 013314 012737 013336 000004 MOV #3$,4 
1097 013322 124645 CMPB ss = (R86) , = (5) 
1098 013324 012737 000241 000302 MOV #241, $F ATAL :MOVE TO MAILBOX # *eeeeee 24] seenens 
073332 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
013334 000000 HALT TACK = 400 AND DECREMENTED, SHOULD TRAP 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 742 
1099 013336 012706 000400 3$: MOV #400,R6 
1100 013342 012737 013364 000004 MOV #5$,4 
1101 013390 134546 - BITB -(R5),-(R6) 
013352 012737 000242 000302 MOV #242, $FATAL :MOVE TO MAILBOX # teeeeee 242 seeenee 
013 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
013362 000000 HALT :NO STACK OVERF LOW. OR WRONG $TSTNM 
TO SCOPE REPLACE HALT WITH 240 
- “AND REPLACE NEXT INST WITH 727 


——— —— 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 71 SEQUENCE 


TEST #62 = TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 
1114 -SBTTL TEST #62 - TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


sR RAE AE ERERRE EERE REREEEE REA EAREREREEREEEEERREAAREREREARERRAREREEEEHEES 


:TEST 62 - TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


PPT T TOTTI TTITITITI TTT LITLE LL LLL LLL LLL LLL 


013364 032737 000001 177766 TST62: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 

013372 001410 BEQ 100$ CH AROUND CLEAR AND HALT IF CLE 

013374 012737 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 

013402 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 

013404 HALT POWER BIT FOUND SET 

013406 042737 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 

013414 0052 7 000304 100$: INC TESTN “UPDATE TEST NUMBER 

013420 022 7 000062 000304 CMP #62,$TESTN ‘SEQUENCE ERROR? 

013426 001011 BNE “BRANCH TO ERROR HALT ON SEQ ERROR 

01 012706 000400 MOV #400,R6 “SET UP STACK TO OVERFLOW 

01 012737 013452 000010 MOV #1$.10 :SET UP 10 VECTOR 

013442 012737 013464 000004 MOV #2$.4 :SET UP OVERFLOW VECTOR 

013450 000010 - 10 ‘THIS TRAP SHOULD CAUSE OVERFLOW 

Eres 012737 000243 000302 MOV #243, $FATAL :MOVE TO MAILBOX # ‘*eeeeee 243 senenee 

013460 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 

013462 00 HALT “TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 

013464 012737 000012 000010 28: MOV #10+2,10 


CKKABDO_ 11/44 TRAPS 
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esssesssssssssess 
Vi itte et 


iw 


SaaS 
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MACRO M1113 11-NOV-81 1e:8 0S PAGE 72 
TEST #63 - TEST THAT AN IOT CAUSES AN OVERFLOW T 


0135 
013872 


000244 


000022 


177766 
000302 


177766 
000304 


000020 
000004 


000302 


000020 
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H 7 
SEQUENCE 


.SBTTL TEST #63 - TEST THAT AN JOT CAUSES AN OVERFLOW TRAP 


SERA EREAAREREARAAAAAE TERE RE AEA AERERERAAERERAREAEARARAAEREREAEEAAEARERAEAES 


:TEST 63 - TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 


POPP PerT TTT TTT TIT I TITTLE LLL LLL 


1ST63: 


100$: 


1$: 


2$: 





#1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
#177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
(R2) :SET MSGTYP TO ERROR 
POWER el FOUND SET 
#1, CPUERR “CLEAR THE BIT FOUND SET 
TEST “UPDATE TEST NUMBER 
#63,$TESTN ; SEQUENCE E 
CH TO ERROR HALT ON SEQ ERROR 
#400.R6 “SET UP STACK TO OVERFLOW 
#1$, $0 :SET UP IOT VECTOR 
#2$.4 =SET UP OVERFLOW VECTOR 


:THIS TRAP SHOULD CAUSE OVERFLOW 


#244 ,SFATAL :MOVE TO MAILBOX # seeenee 244 teaneer 
(R2) > SET MSGTYP TO FATAL ERROR 
s TRAP FLAG Ag A 4x Ra or eUR.. OR WRONG STSTNM 
>TO SCOPE REPLAC De 
* AND REPLACE as wast fe 61 
#20+2,20 


85 
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CKKABDO 11/44 TRAPS 
TEST #64 = TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


-SBTTL TEST #64 - TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


SRRAAARAAAAARAAEAAKAAAAAAAAAAAAAA RARER RAKAAAAAKAAAARAKARARKeAARAAAAA TA AeS 


:TEST 64 - TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


WPOOTOTTTTTITITILTILITL LILI LLL LLL LLL LLL LLL 


1116 


eceeeseeeeoesceece 
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MACRO M11 


000032 


13. 11-NOV-81 10:05 PAGE 73 


177766 
000302 


177766 
000304 


000030 
000004 


000302 


000030 


1ST64: 


100$: 


1$: 


2$: 


BIT 


me ee — 


coe 
SEQUENCE 





#1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
1 CH AROUND CLEAR AND HALT IF CLEAR 
#177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) S ERROR 
Py SET 
#1, CPUERR SET 
STESTN 
#64,$TESIN 
1 H TO ERROR HALT ON SEQ ERROR 
#400,R6 “SET UP STACK TO OVERFLOW 
#1$.30 :SET UP EMT _V 


A} “iP OVERFLOW VECTOR 
THIS TRAP SHOULD CAUSE OVERFLOW 


#245 ,$FATAL sMOVE TO MAILBOX # seeenee 245 eanenee 
(R2) 4H a TO FATAL ERROR 
LAG OVERFLOW DID NOT OCCUR,OR WRONG S$TSTNM 
‘TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 761 
#30+2,30 


——<— mm ee eee ee ee ee eel 


“cxxanog 11/44 TRAPS 
TEST #65 = TEST THAT AN TRAP CAUSES AN OVERFLOW T 





013706 032737 000001 177766 TST65: BIT 

013714 001410 BEQ 

413716 012737 000177 000302 MOV 
0137 4 005212 INC 
013726 HALT 
0137 0427 7 000001 177766 BIC 
013736 005237 000304 100$: INC 
013742 022 37 000065 000304 CMP 
01375 1011 BNE 
013752 01 706 000400 MOV 
013756 012737 013774 000034 MOV 
013764 012737 014006 000004 MOV 
013772 104400 TRAP 
013774 1$: 
013774 012737 000246 000302 MOV 
014002 005212 INC 
0140046 000000 HALT 
014006 012737 000036 000034 2$: MOV 


TUTEEEEEEEwEEE EEE SL 
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7 
SEQUENCE 


1117 -SBTTL TEST #65 - TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 


SERRA AAARAAAAAAAEAAAAAERAAAEEAEAAREARARAARERAAHKAKAAKAARAA RARER HARA AAR AE RS 


:TEST 65 - TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 


PPT T TTT TITTITITILITL LILLIE LLL LLL LLL LLL LLL iii 


#1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
1 CH AROUND CLEAR AND HALT IF CLEAR 
#177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
(R2) ;SET MSGTYP TO FATAL ERROR 
R BIT FOUND SET 
#1, CPUERR “CLEAR THE BIT FOUND SET 
TESTN ‘UPDATE TEST NUMBER 
#65,$TESTN ; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 
#400,R6 “SET UP STACK TO OVERFLOW 
#1$,34 ;:SET UP TRAP VECTOR 
#2$.4 :SET UP OVERFLOW VECTOR 
“THIS TRAP SHOULD CAUSE OVERFLOW 
#246, $F ATAL :MOVE TO MAILBOX # tenner 246 seeeees 
(R2) SET mSGrYP TO FATAL ERROR 
“TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
#3442,34 


ewe ree - - — 


87 


ne 





at ototovotos 

oF 
SSSSNer 
MRNA 


s 


PARANA 
—o 
oos MEMS 


>) 
pte te ee eR 
oO 
™~ 
™m 


‘>t er aT >t pt at ut bt bt bt et >? > 
—> 
MONS 


So ] 
=i 
. 
aud 
—_ 
=> 


ChnAaoy 11/44 TRAPS 
TEST #66 ~ TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 
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000016 


177766 
000302 


177766 
000304 


000014 
000004 


000302 


000014 
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SEQUENCE 88 


.SBTTL TEST #66 - TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


FERRE AAAEEAAAERAR AEE RETA AERA AEAEREREEARAERERERAAREAERERERER EAHA EAE HERES 


> TEST 66 - TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


PPT POTTTTTTTTITITITT II LILILI LLL LLL LL LIL LLL LLL 


TST66: 


100$: 


1$: 


2$: 






#1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MON TOR BIT) IS SET 
100$ CH AROUND CLEAR AND HALT IF CLEAR 
#177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) “SET MSGTYP TO FATAL ERROR 
“CPU POWER BIT FOUND SET 
#1, CPUERR “CLEAR THE BIT FOUND SET 
$TESTN “UPDATE TEST 
#66,$TESTN * SEQUENCE ERROR? 
1$ “BRANCH TO ERROR HALT ON SEQ ERROR 
#400,R6 “SET uP STAck TO OVERFLOW 
#1$,14 :SET UP TRT 
#2$,4 SET ye TOVERFLOW VECTOR 


: THIS TRAP SHOULD CAUSE OVERFLOW 


#247 ,$FATAL sMOVE TO MAILBOX # seeeann 247 steenee 
(R2) : SET ghy TO FATAL ERROR 
:T FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 
*TO SCOPE REPLACE HALT WITH 240 
etaen. 0 * AND REPLACE NEXT INST WITH 761 
+ — 


_ L—_—$ GAA GLEE AL A A me — 


eae eae 


oe IL, HELE DRSTTS Tw TTT, TT LLL 


CKKABDO 11/44 TRAPS 


TEST #67 = TEST THAT AN 
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ILLA CAUSES AN OVERFLOW T 
.SBTTL TEST #67 - TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


FRRAAAAAAAAAATAAHRARAAAAAAE CETERA ARARARAA RARER HAAAKA RAHA ARTALAKARAAAAsAAas 


:TEST 67 - TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


PPPeTPeTTTTTTTITITITITI TITTLE LLL LLL LLL LLL 





000001 177766 TST67: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) ‘SET MSGTYP TO FATAL ERROR 
HALT :CPU POWER BIT FOUND SET 
000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
000304 100$: INC STESTIN ‘UPDATE TEST NUMBER 
000067 000304 CMP #67,$TESIN “SEQUENCE ERROR? 
BNE 1$ “BRANCH TO ERROR HALT ON SEQ ERROR 
000400 MOV #400,R6 “SET UP STACK TO OVERFLOW 
014210 000010 MOV #1$,10 ;SET UP ILLA VECTOR 
014222 000004 MOV #2$.4 -SET UP OVERFLOW VECTOR 
“ ILLA *THIS TRAP SHOULD CAUSE OVERFLOW 
000250 000302 MOV #250, $FATAL :MOVE TO MAILBOX # teeeeee 250 seeecne 
INC (R2) :SET MSGrYP TO FATAL ERROR 
HALT “TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
000012 000010 2s: MOV #104241 10 
000370 CAP Rb. -4370 :STACK PUSHED FOUR WORDS? 
000251 000302 MOV #251, $FATAL :MOVE TO MAILBOX # teeeeee 25] seeeees 
INC (R2) “SET MSGTYP TO FATAL 


S WERE NOT PUSHED ONTO STACK 
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ILLB CAUSES AN OVERFLOW T 
-SBTTL TEST #70 - TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 


see aaeaeeaateneeeeeeeeeeeeeeeananaatearaneneanaaatanaeeanaaeanaaasareareas 


000012 


- me ee ee ee eee 


000010 
000004 
000302 


000010 


:TEST 70 - TEST 


SEQUENCE 


THAT AN ILLB CAUSES AN OVERFLOW TRAP 


PPPOTTTOTITITITITITITILILL LILI LL LLL LL LLL LLL 


1sT70: BIT 


B 
100$: INC 


2$: MOV 


_——$ 





#1, CPUERR ; SEE IF BIT O OF CPUERR oo MONITOR BIT) IS SET 
100$ CH AROUND CLEAR AND HALT IF CLEAR 
#177 ,SFATAL ITOR FATAL # TO SFATAL 
(R2) ET MSGTYP H ATAL ERROR 
#1, CPUERR 
STESTN $ 
#70. $TESTN 
1$ CH TO ERROR HALT ON SEQ ERROR 
#400,R6 “SET UP STACK TO OVERFLOW 
#i$.10 :SET UP ILLB VECTOR 
#234 3SET * OVERFLOW VECTOR 
TH 1S TRAP SHOULD CAUSE OVERFLOW 
#252.$F ATAL sMOVE TO MAILBOX # saeenee 252 seeenee 
(R2) SET MSGTYP TO FATAL ERROR 
: TRAP FLAG OVERFLOW DID 5 4 gc cun. OR WRONG STSTNM 
*T0 SCOPE REPLACE HALT WITH g00 
* AND REPLACE NEXT INST WITH 761 
#10+2,10 


nN 7 
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TEST #71 = TEST FOR FALSE OVERFLOW TRAP 
1126 -SBTTL TEST #71 = TEST FOR FALSE OVERFLOW TRAP 


*REREEASEAEERAAAEAERAEHEEEEEAEEREARARERREREAKRARREAKRRERRE HEHEHE 


“TEST 71 =- TEST FOR FALSE OVERFLOW TRAP 


“RERAEAERERAAARERARAREAEEERAEAERERAERERERAAEHRAARKRAERRRERARAEHEHREHH EHH HEHEHE 


014356 032737 000001 177766 TST71: BIT #1. CPUER 


-REM 2% 

IDENTIFICATION 
PRODUCT CODE: AC-F621D-MC 
PRODUCT NAME: CKKABDO 11/44 TRAPS 
DATE CREATED: OCTOBER, 1981 
MAINTAINER: DIAGNOSTIC GROUP 
AUTHOR: DAN MILLEVILLE 


COPYRIGHT (C) 1979, 1981 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 


THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE 
ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION 
OF DEC*S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT 
AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC. 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF 
ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC. 
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1. ABSTRACT 


THIS IS A TEST OF ALL OPERATIONS AND gry ye EL THAT CAUSE 
TRAPS. ALSO TESTED ARE TRAP OVERFLOW CONDITIONS, 
ODDITIES OF REGISTER 6, INTERRUPTS , THE RESET AND WAIT INSTRUCTIONS. 





’ 
| c 8 


CKKABDO 11/44 TRAPS | MACRO M1113. 11-NOV-81 10:05 PAGE 4 SEQUENCE 3 
39 2. REQUIREMENTS 
rs 1 EQUIPMENT 
rs 11/44 STANDARD COMPUTER | 
78 2.2 STORAGE 
23 2.2.1 PROGRAM STORAGE - THE ROUTINE USES MEMORY 


48 FROM 0000 TO 17600. 


——— ee 


a ee | - - —_— 
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3. LOADING PROCEDURE 
ME THOD 
PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 
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MACRO M1113 11-NOV-81 10:05 PAGE 6 SEQUENCE 


4. 


STARTING PROCEDURE 


THE PROGRAM STARTS AT 200. 


IF IT IS DESIRED TO RESET THE PASS COUN 
ZERO ; THEN START THIS PROGRAM AT LOCAT 


PROGRAM AND/OR OPERATOR ACTION 


LOAD PROGRAM INTO MEMORY. (BOTTOM 4K) 
sg foes. 


— 4 


THE PROGRAM WILL LOOP. 
IT WILL PRINT NEKKABDO 11/44 TRAPS'’ AFTER THE FIRST ITERATION 
AND THEN PRINTS IT EVERY 15 TIMES(APROXIMATELY EVERY 15 SECONDS) 


eee ee ele ell OO 
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| CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 7 SEQUENCE 
70 5. OPERATION 
a 
73 
2% 5.1 SUBROUTINE ABSTRACTS 
76 5.1.1 BEGIN AT 200 
78 5.1.2 SCOPE 
80 IF A SCOPE LOOP IS NEEDED INSERT A BRANCH AS THE 
81 COMMENT TO THE HALT EXPLAINS. 
83 
84 5.1.3  TRAPCATCHER 
86 
87 THIS IS A SERIES OF INSTRUCTIONS DESIGNED TO DETECT AND 
88 ISOLATE UNEXPECTED TRAPS AND INTERRUPTS, THAT OCCUR IN THE 
89 TRAP AND INTERRUPT VECTOR AREA OF MEMORY. 
91 THE PRINCIPLE OF THIS ROUTINE IS: THE VECTOR ENTRANCE 
92 ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH WILL CON- 
93 TAIN A HALT (000000) (THIS LOCATION IS ALSO THE STA 





ATUS 
WORD FOR ATHAT VECTOR ENTRANCE. BUT THIS WILL HAVE NO EFFECT 
ON IT ALSO BEING THE NEXT INSTRUCTION). 


IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 

REGISTER SIX SHOULD BE EXAMINED TO Baga 2-3 ITS CONTENTS, 

THEN USE REGISTER SIX CONTENTS AS AN ADDRESS TO DETERMINE 
PROGRAM WAS. WHEN THE INTERRUPT OR 









WHERE THE N 
TRAP OCCURRED: MEMORY AS SPECIFIED BY R6 CONTAINS THE 
PC OF THE INSTRUCTION FOLLOWING THE INSTRUCTION WHERE THE 


TRAP OCCURRED. 
THE CONTENTS OF LOCATION ‘STESTN'(304) CONTAINS 
THE TEST NUMBER THAT IT WAS DOING BEFORE IT 





5.2 PROGRAM AND/OR OPERATOR ACTION 


5.2.1 LOADING AND STARTING AT 200 STARTS THE TEST. IF 
AN ERROR 1S DETECTED. THERE WILL BE A HALT. 
NOTE:IF A SCOPE L LOOP |] DED 
THE COMMENT SECTION OF THE HALT EXPLAINS 
HOW TO UTILIZE THIS LOOP. 


RUN OSBNRAE AVIS SBNRAS 


1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
1 
1 
1 
1 
1 





ee ee ee 
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CE LOCATION “‘TESTN'’ SHOULD BE CHECKED FIRST 
TO SEE IF IT MATCHES THE PRESENT TEST. 
IF IT DOESN'T MATCH ; THEN THE CONTENTS OF THIS LOCATION 
TELL YOU WHICH TEST IT WAS DOING BEFORE IT ° 
FVIGTLTTTTTTTATATTTTTTT TATA TTTA LATA ETT 
6.2 ERROR RECOVERY 


ON TRAP ERRORS - RESTART AT STARTING ADDRESS 


OULU 
THE TEST SEQUEN ; ; 


ON POWER MONITOR ERRORS - FIND OUT WHAT POWER SUPPLY PROBLEM (OR CPU 
at saatic THERE IS AND OBTAIN REPAIR BEFORE RERUNNING 


CKKABDO 11/44 TRAPS | MACRO M1113 11-NOV-81 10:05 PAGE 8 SEQUENCE 7 
115 6. ERRORS 
117 6.1 ALL ERRORS WILL CAUSE A HALT. 
119 6.1.1 THE PROGRAM CHECKS TO SEE THAT THE P.C. DOESN'T JUMP | 
120 WITHIN THE TESTS, BY A SEQUENCE COUNT CALLED 'STSTN’ 
121 THIS TEST IS A SEQUENCIAL INCREMENT AND COMPARE CO\'NT. | 
138 EXAMPLE 
125 TSTA: INC = $TSTNM ; INCREMENT THE TEST NUMBER | 
126 CMP = ss WA, STSTNM COMPARE FOR THE RIGHT TEST 
127 ap, OME TSTAI“12 ;IF NOT CORRECT BRANCH TO A HALT 
x* $ 
1¢9 BEQ ©=-_- 1000 ;BRANCH AROUND JUMP IF Ok 
1 JMP = TSTA#1=12 ; JUMP (USED FOR LONG TESTS THE BRANCH CAN'T REACH) 
131 1000$: 
132 oo== 
13 CODE 
134 
135 
136 
137 ANT 
138 RAREKEKEERERREEAEEAEREEEEEEEE 
13 
14 IF AN ERROR IS DETECTED ;1T COULD BE BECAUSE OF THREE REASONS. 
14 A) WRONG TEST NUMBER 
14 B) ERROR IN THE PRESENT TEST. 
16 c) POWER MONITOR BIT PROBLEM. 
14 
14 
14 
14 
14 
15 
15 
15 
15 
15 
15 
15 
15 
15 


CONAUE WYO OO NAUILS WH OO 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 9 SEQUENCE 8 
128 fe RESTRICTIONS 
12) 7.1 STARTING RESTRICTION 
if ~ 
HF 7.2 OPERATIONAL RESTRICTION 
is oe 


——pame oe —s 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 10 SEQUENCE 9 


8. MISCELLANEOUS 


8.1 EXECUTION TIME 
1ST PASS APPROX. 2 SEC., THEREAFTER EVERY 15 SEC 


~~ 
SN NO 
N=SSH 


42 een — _ LA A LE OE LLL LL LL LE ALE LLL LLL, 


| 
CKKABDO 11/44 TRAPS 


Sedindindindindandndadadinnen bare neene 
BOONE APR OOO ORO 


———— 


MACRO M1113 


11-NOV-81 10:05 PAGE 11 


9. 


A AL LE LG LL LLL LLL LLL LLL LL LLL LE LL 


PROGRAM DESCRIPTION 


THIS PROGRAM CHECKS THAT ON ALL TRAP OPERATIONS REG 
6 IS gt pte THE CORRECT AMOUNT, THAT in C 
PC IS SAVED ON He Mee Be} THE OLD CONDIT 


ARE CORRECT. BOTH THE 
TRAP INSTRUCTIONS ARE TESTED TO SEE THAT ALL COMBINATIONS WILL 
ALSO IS THAT ALL RESERVED INSTRUCTIONS 
ERIFICATION OF THE ‘‘TRT'’ INSTRUCTION (00003) 
FOR SOFTWARE DEBUG ROUTINES: ODT.DDT. I$ DONE. 
ALSO, THE TRACE BIT IS CHECKED TO SEE IF IT CAUSES A TRAP. 
HE ATI AND RTT INSTRUCTIONS ARE CHECKED. STACK OVERFLOW 1 
L THE TRAP INSTRUCTIONS. 


CHE 
SPECIAL CHECKS ARE RADE TO SEE IF BUS 
ERROR TRAPS OCCUR ON NON-EXISTENT MEMORY.PIRQ TRAPS ARE CHECKED 


AT ALL LEVELS. 


SEQUENCE 


10 


— —  <—-e- -- _—_ — -——- 


k 8 
| CKKABDO 11744 TRAPS MACRO 41113 11-NOV-81 10:05 PAGE 12 SEQUENCE 11 

19 10.0 RUNNING UNDER APT 

136 THE EXECUTION TIMES PROVIDED IN THE APT SCRIPT THAT FOLLOWS 
19 ay FOR EXECUTION WITH A 11/44 PROCESSOR, CACHE, 

194 16K CORE MEMORY, AND 300 BAUD. 

195 THE FOLLOWING IS A PROGRAM LOAD FILE USED BY APT: 
ys 1. E— TABLE ‘A* IS USED FOR APT DUMP MODE. 

198 2. E TABLE ‘B’ IS USED FOR APT QV AND RUN TIME MODES. 
+4 SENVM=040 INDICATES THAT TYPEOUTS WILL BE SUPRESSED. 
201 

ops 1ST PASS LONGEST ADDITIONAL 

20 RUN TIME TEST TIME RUN TIME 

204 5 5 

05 

06 
Sse ee a a ke gone E TABLES = ncccece 

208 

209 
210 A B 

211 E-MODE /S-MODE 000/000 040/001 

sig (SENVM/S$ENV) 
214 SWITCH REGISTER 1 000000 000000 

si? ($SWREG) 

217 SWITCH REGISTER 2 000000 000000 

218 CPU TYPE/OPTIONS 00/0000 00/0000 


CKKABDO 11/44 TRAPS 
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11.0 
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L 8 


REVISION HISTORY 


REVISION 


CKKABA 
CKKABB 


CKKABC 
CKKABD 


DATE 


MARCH 1979 
NOVEMBER 1980 


APRIL 1981 
OCTOBER 1981 


SEQUENCE 


COMMENT 


ORIGINAL RELEASE 

va DIAGNOSTIC HALT bh CIS SWITCH IN 
THE MAINTENANCE POSIT 

INCLUSION OF int BIT 0 


AND UNIBUS 
INTERRUPTS PENDING, UNIBUS SERVICE IS 


a 68 
CKKABDC 11/44 TRAPS MACRO 1113 11-NOV-81 10:05 PAGE 14 SEQUENCE 

32 TITLE CKKABDO 11/44 TRAPS 

2 7ALL INSTRUCTIONS THAT ARE RESERVED 

9 *SHOULD TRAP TO LOCATION 10, AND 

“PC THAT POINTS TO THE TRAPPING INSTRUCTION 

1 >SHOULD BE PLACED ON THE STACK 
3 : “LISTING 
33 .LIST ME 
334 -NLIST MC 

5 -NLIST MD 
336 .NLIST CND 
337 000000 -ENABLE ABS 
335 ~ENABLE AMA 

9 090000 RO =%0 
340 000001 R1 =%1 
341 000001 LAST =%1 
ag 000002 R2 =a¢ 
34 000003 R3 sf 
344 000003 TAB =%3 
345 000004 R4 =%4 
208 000005 R5 =%5 
34 000005 FIRST =%5 
348 009006 R6 =%6 
349 000006 SP =%6 
350 000007 R7 =%7 
351 000007 PC =%7 
226 000000 HL T=HALT 
35 000003 TRI=3 
354 000004 RTRAPS=4 ILLEGAL ADDRESSES 
355 000014 RTRAP4=14 -FOR TRACE TR 
356 000030 RTRAP3=30 >FOR EMULATOR TRAP 
357 000020 RTRAP2=20 sFOR I TRAP 
358 34 RTRAP1= -FOR TRAP INST 
359 177564 TTCSR=177564 

177560 TRCSR=177560 

1 7564 TPS=17 

4 177566 TPB=177566 
36 000240 BELL=240 
$64 O00sse NOP=24 
365 177776 STATUS=177776 
366 10 TRAPA= 
367 000010 RTRAP=10 

004700 ILLA=004700 

9 100 ILLB=100 
370 177776 CC=1777 ¢ 
371 177766 CPYERR=1777 
372 177613 CERMSK=177413 
37 177776 PSW=177776 
374 -MCALL .$APTHDR,.SAPTBLS,.$ACT11 


——_ ee ee 


000076 


mn eenld eal coal cml eels lly eels ely eels meal eels eels eel eels el ely eel enaly eels els el emis el eel 


SSSSSSSSSSSSSSSSSSSSsssEs 
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-WORD .*2 
HALT 
-WORD .+2 
HALT 
- WOR -t2 
HALT 
° o%% 
HALT 
° -t2 
HALT 
ou +2 
HALT 
-WORD .+#2 
HALT 
«WORD .*2 
HAL T 
‘ +2 
HALT 
-WORD  .+2 
HALT 
«WORD .+*2 
HALT 
-WORD .+*2 
HALT 
-WORD .+*2 
HALT 
-WORD .*2 
HALT 
-WORD .+#2 
HALT 
-WORD .+*2 
HALT 
2 +2 
HALT 
«WORD .#2 
HALT 
o +2 
HALT 
+ +2 
HALT 
«WORD .+2 
HALT 
. WOR -+2 
HALT 
-WORD .+2 
HALT 
-WORD .+#2 
HALT 
-WORD .+2 
HALT 
. WORD +2 
HALT 
- WORD +2 
HALT 
-WORD .+#2 
HALT 
. WORD .t*2 


; ADDRESS OF ext 
F HALTED HE 
“ADDRESS OF Next 
F HALTED HERE 
: ADDRESS OF NEXT 
F HALTED HERE, 
: ADDRESS OF NEXT 
HALTED HERE 
: ADDRESS OF NEXT 
HALTED HERE, 
: ADDRESS OF NEXT 
“IF HALTED HERE 
[ADDRESS OF NEXT 
> IF HALTED HERE, 
*ADDRESS OF NEXT 
:1F HALTED HERE 
; ADDRESS OF NEXT 
F HALTED HERE, 
“ ADDRESS OF NEXT 
“IF HALTED HERE, 
; ADDRESS OF NEXT 
HALTED HER 


c. 
: ADDRESS OF NEXT 
HALTED HER 


ED HE 
;ADDRESS OF Next 
TED HERE 
: ADDRESS OF NEXT LO 
“ADDRESS OF NEXT 
SS OF NeXt 
iF HALTED HERE 
“ADDRESS OF NEXT 
‘JF HALTED 
“ADDRESS OF NeXT | 


Z1F HALTED HERE 
: ADDRESS OF NEXT L 


HALTED HER 
; ADDRESS OF NEXT LO 
*I1F HALTED HERE 
: ADDRESS OF NEXT 


A TEL LL OL LLL LE LLL IS LLL 


LOCATION 
cari TO PREVIOUS 
TRAPPED TO PREVIOUS AD 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATION 

TRAPPED TO PREVIOUS 
LOCATION 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATION 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 
LOCATION 

TRAPPED TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 


t LOCATI 


TRAPPED TO PREVIOUS 
LOCATI 
yet TO PREVIOUS 


LOCAT 
TRAPPED TO PREVIOUS 
eatin TO PREVIOUS 


TRAPPED TO PREVIOUS 
‘acatic TO PREVIOUS 
‘ara ie TO PREVIOUS 
LOCATI 

TRAPPED TO PREVIOUS 


OCATION 
TRAPPED TO PREVIOUS 
TRAPPED TO PREVIOUS 


TRAPPED TO PREVIOUS 
LOCATION 


SEQUENCE 


ADDRESS 

ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 15-1 SEQUENCE 15 
000162 000000 HALT : IF HALTED HERE rear ties TO PREVIOUS ADDRESS 
000164 0001 


66 .WORD =. #2 : ADDRESS OF Next LOC 

















000166 000000 HALT TRAPPED TO PREVIOUS ADDRESS 
000170 000172 WOR +2 ZAD DDRESS OF NEXT 0 
000172 000000 HALT F HALTED LOAPPED TO PREVIOUS ADDRESS 
000174 000176 +2 : ADDRESS OF NEXT 0 LOCAT 
000176 000000 HALT HALT TRAPPED TO PREVIOUS ADDRESS 
000200 000202 +2 ADDRESS OF NEXT LO LOC 
000202 000000 HALT T TRAPPED TO PREVIOUS ADDRESS 
000204 006206 .WORD .+#2 S ADDRESS OF cet LO LOCATION 
000206 000000 HALT “IF HALT TRAPPED TO PREVIOUS ADDRESS 
000210 000212 WORD .42 “ADDRESS OF NEXT LO 
000212 000000 HALT “IF HALTED HER TRAPPED TO PREVIOUS ADDRESS 
000214 000216 .WORD +2 “ADDRESS OF MNEXT LO LOC 
000216 000000 HALT “IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000220 000222 .WORD +2 “ADDRESS OF NEXT LOC 
000222 HALT :1F HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000224 000226 .WORD .42 ADDRESS OF NEXT LOCATI 
000226 HALT “IF HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000230 000232 .WORD .+2 “ADDRESS OF NEXT LOC 
000232 000000 HALT ‘IF HALTED HERE SOAPPED TO PREVIOUS ADDRESS 
000234 000236 .WORD .+2 SADDRESS OF NEXT LOCATION 
000236 000000 HALT “IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000240 000242 .WORD +2 “ADDRESS OF NEXT LOCATION 
000242 000000 HALT ‘IF HALTED HERE. TRAPPED TO PREVIOUS ADDRESS 
000244 000246 .WORD .+#2 ‘ADDRESS OF NEXT LOCATI 
000246 000000 HALT “JF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000250 000252 WORD 42 *ADDRESS OF NEXT LOCATI 
000252 HALT ‘IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000254 000256 WORD .+2 “ADDRESS OF NEXT LOCATION 
000256 HALT ‘IF HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000260 000262 .WORD .4#2 “ADDRESS OF NEXT LOCATION 
000 HALT -1F HALTED HERE, TRAPPED TO PREVIOUS ADDRESS 
000264 000266 .WORD .+#2 “ADDRESS OF NEXT LOCATION 
000266 HALT ‘IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000270 000272 .WORD .+#2 ADDRES OCATION 
000272 HALT *]F HALTE TRAPPED TO PREVIOUS ADDRESS 
000274 000276 WORD 42 “ADDRESS OF NEXT LOCAT 
000276 HALT ‘IF HALTE TRAPPED TO PREVIOUS ADDRESS 
000 000302 .WORD .42 “ADDRESS OF NEXT LOCAT 
000302 HALT :1F HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000304 000 .WORD +2 SS OF NEXT Lc LOC 
000306 HALT *I1F HALTED TRAPPED TO PREVIOUS ADDRESS 
000310 0003172 WORD .+#2 :ADDRESS OF Meet Loc LOC 
000312 HALT *]F HALTED HERE TRAPPED TO PREVIOUS ADDRESS 
000314 000316 .WORD .42 : SS OF NEXT LOCAT 
000318 900000 HALT HERE, TRAPPED TO PREVIOUS ADDRESS 
000320 000 WORD .+#2 OF NEXT LOCATI 
000322 900000 HALT HERE, TRAPPED TO PREVIOUS ADDRESS 
000324 326 .WORD +2 LOCA 
000 HALT TRAPPED TO PREVIOUS ADDRESS 
000330 000332 .WORD +2 LOC 
000 HALT : HERE TRAPPED TO PREVIOUS ADDRESS 
000 34 SOO S86 WORD .+42 : S OF NeXt LOC 
000336 000000 HALT “IF HALTED TRAPPED TO PREVIOUS ADDRESS 
000340 000342 .WORD .42 :ADDRESS OF sent 10 LOC 
000342 000000 HALT “IF HALTED HERE, OED TO PREVIOUS ADDRESS 





Pees 11/44 TRAPS 


Nm 


SSeeesssssssss 


Ww 


pares 


SN™N 
Oer 


MACRO M1113 





. 
11-NOV-81 10:05 PAGE 15-2 


. WORD .+2 a 
HALT : 
-WORD .+#2 : 
HALT 3 
-WORD .+2 ; 
HALT ; 
«WORD .+2 : 
HALT : 
-WORD .+2 ; 
HALT ; 
-WORD .+2 ; 
HALT ; 
-WORD .+#2 c 
HALT ; 


XT LOCATION 
TRAPPED TO PREVIOUS ADDRESS 
f LOCATION 
TRAPPED TO PREVIOUS ADDRESS 
f LOCATION 
TRAPPED TO PREVIOUS ADDRESS 
f LOCATION 
TRAPPED TO PREVIOUS ADDRESS 
T LOCATION 
E, TRAPPED TO PREVIOUS ADDRESS 


TRAPPED TO PREVIOUS ADDRESS 
LOCATION 
E, TRAPPED TO PREVIOUS ADDRESS 





SEQUENCE 


16 


dD. 9 
SEQUENCE 
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5 .=200 
000200 000137 000510 JmP_ ss BEGIN 
10 005037 CLR” spas 
SES12 S0Sr S88 a: 
000 .=300 
91 .SBTTL ACT11 HOOKS 
{RARE AAARERAEEAEAERE EEE AAEEEERERARARAE AREER KEEAERRERARAAERAEEARAE RAR ERAE ETERS 
HOOKS REQUIRED BY ACT11 
000300 SSvPC=. ;SAVE PC 
000046 028350 SENDAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
000052 900000 WORD 0 ;:2)SET LOC.52 TO ZERO 
000 .=SSVPC :: RESTORE PC 


ere ee ee ee -_=- 


CKKABDO 11/44 TRAPS 
APT MAILBOX~E TABLE 


393 


SRENes 


SSSSSSESSEESEES 


MMNNNNN--—— 
ALM OOO fr 


000330 


000 


000000 
000000 
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MACRO M1113 11-NOV-81 10:05 PAGE 17 SEQUENCE 


-SBTTL APT MAILBOX~E TABLE 


£RAEAAAAAAAAAAEREEAAAERE EEA AERAAAAAERAEERARRAE ERR ERERAE EERE RAE RARER HERETO OS 





.EVEN 
IL: ;;APT MAILBOX 
GTY: .WORD AMSGTY ;;MESSAGE TYPE CODE 
SFATAL: .WORD AFATAL ;;FATAL ERROR NUMBER 
STESTN: .WORD ATESTN ;;TEST NUMBER 
ASS: .WORD APASS  ;;PAS 
SDEVCT: .WORD ADEVCT ;;DEVICE COUNT 
IT: .WORD AUNIT ;;1/0 UNIT NUMBER 
SGAD: .WORD AMSGAD ;;MESSAGE ADDRESS 
GLG: .WORD AMSGLG ;;MESSAGE LENGTH 
SETABLE: ;;APT ENVIRONMENT TABLE 
SENV:  .BYTE AENV ; ENVIRONMENT BYT 
SENVM: .BYTE AENVM ;;ENVIR T MODE BITS 
SSWREG: .WORD ASWREG ;;APT SWITCH REGISTER 
SWR: .WORD USWR ee TCHES 
$CPUOP: .WORD ACPUOP ;;CPU TYPE,OPT oo 
7* BITS 15-115¢PU T 
:* 1/04=01, 11/0502, 11/20=03,11/40=04,11/45=05 
s* BIT 10=REAL TIME CLOCK — 
;* BIT 9=FLOATING POINT PROCESSOR 
ire BIT 8=MEMORY MANAGEMENT 


_—— ne ee 
eee ee —— — 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 18 SEQUENCE 19 
APT PARAMETER BLOCK 
395 -SBTTL APT PARAMETER BLOCK 


SRERAAAEAAAAEAAAEAEEAAEEAAEAEAEREERAA AREER ERAERERERAERARAREERAREERERET OREN EE EES 


7SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


[oe re. ee eenenencaunonconennrenesreres 


000330 -SX=. ;;SAVE CURRENT LOCATION 

000024 .=24 ot; POWER FAIL TO POINT TO START OF PROGRAM 
000024 0002 200 FOR APT START 

000044 -=44 : POINT TO APT INDIRECT ADDRESS PNTR. 
000044 000330 SAPTHDR ;;POINT TO APT HEADER BLOCK 

000330 .=.$X | ;;RESET LOCATION COUNTER 


seennagaacsareseunssnetoegsesecoenseasetucecesetenseonoooocoeeceeoeeceeoes 
TUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
{INTERFACE SPEC. 





000330 

sa 000000 SHIBTS: .WORD 0 23 TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

000332 000300 SMBADR: .WORD SMAIL ADDRESS OF APT MAIL®9X (BITS 0-15) 

000334 000005 STSTM: .WORD 5 ::RUN TIM OF LONGEST 1<ST 

000336 000005 SPASTM: .WORD 5 if IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

000340 000000 ITM: .WORD 77 ONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
000342 000014 “WORD $ETEND~SMAIL/2 ;;LENGTH MAILBOX~E TABLE (WORDS) 


TT 


ere eee a eee ee - —_——— 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 19 SEQUENCE 20 
APT PARAMETER BLOCK 
7 STSTNM=STESTN 
336 900303 SERROR=SFATAL 
re 5 -=500 
401 68 BUF F 0 
res 50 RCPUER: .WORD 0 
504 KTVEC 250 
04 06 5 KTSTA: .WORD 252 


S| 
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— 
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= 
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_ 


Wwrora 
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= 
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MACRO M1113 11-NOV-81 10:05 PAGE 20 SEQUENCE 21 
BEGIN: MOV #500,SP :SET UP STACK POINTER 
900390 0 3576 MOV #1, PASSPT “CLEAR THE ITERATION COUNTER 
000042 023550 CMP 42, $ENDAD [SEE IF TITLE MESSAGE SHOULD BE PRINTED 
BEQ RESTRT “BRANCH AROUND MESSAGE PRINTING IF SO 
024216 JSR PC, PRTMSG :GO PRINT MESSAGE USING 
“WORD TITLE “STARTING ADDRESS OF THIS MESSAGE 
000300 RESTRT: CLR SMSGTY 
300 MOV #500,R6 
024132 000024 MOV #PWRDWN, 24 :SET UP THE POWER DOWN VECTOR 
340 000026 MOV #340,26 “SET UP POWER DOWN PRIORITY 
200008 000004 MOV #6,4 “SET UP TRAP VECTORS 4 & 6. 
L 
000012 000010 MOV #12,10 
12 CLR 12 
000 CLR STSTNM 
000302 CLR SERROR 
000300 MOV #SMSGTY,R2 
BR TST1 


— aaa, -_—- 


-_ - ae 


—————— —_ 
cr PR EE, LT 


. = 
| CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 21 
APT PARAMETER BLOCK 


423 sSPECIAL CASE OF ODD; .EVEN .BYTE AND REGISTER 6 
: : 000000 HERE=0 

4 S K1: -WORD 0 

4 K2: -WORD 0 

4 2 K3: «WORD 0 

4 K4: -WORD 0 

4 K5: WORD 0 

431 0 K6: -WORD 0 

4 2 K7: . WORD 03242 
4 2 052400 <19: WORD - 400 
4 : 

435 eat 000000 K12: WORD 0 


SEQUENCE 
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TEST #1 - TEST AUTO INC 


436 


ooo 
nN--- 
mono 


oO 
™m 


S208 
ES 


— te et ot st ot 
S2ec 


ssssssss 
BEE 


457 
458 001052 


goss 
OW 
WIN 
NEN 
—Wie 
NNON 


S 
=—nrvpy 
—& ron 
Ns 


sees 
WOWW 
NSININ™N 


-=WOornw 
MNVN™N 


005006 


MACRO M1113 


AND DE 


000001 
000177 
000001 
000304 
000001 
001220 
000000 
000002 
000001 


001000 
000000 
000776 
000002 


000004 
000003 


000002 
000004 


ee eee ae ee ee 


177766 
000302 


177766 


000304 


000302 


000302 


000302 


000302 
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C OF R6 FOR WORD AND BYTES 


SEQUENCE 25 


.SBTTL TEST #1 - TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


SAREE EEAAEAAEAEEAAEAAEAAEAAAEAAAARARAAARAAAAAAAARARARERAAAAEAAAEAAEEAREAAAEESE 


“TEST 1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 


EAE AARAAAEAARAAEEAAEAEAAEAEARARAERAAAAAAAAAAAEKEEAAARAAEEREEAEEEAAAAEAEAED 


TST1: 


100$: 


1000$: 


18: 


2$: 


3$: 


4$: 


#1, CPUERR 
7, SFATAL 
#1, CPUERR 
STESTN 

#1, $TESTN 


1000$ 
TST2=12 


R6 
(R6) +, HERE 
R6 M2 


#1, SFATAL 


(R2) 


#1000 ,R6 
=«6) AHERE 
#776 


BS 
#2, SF ATAL 


(R2) 


R6 
(R6)+, (RE)+ 
R644 


#3. SF ATAL 
(R2) 


R6 

RG 

(R6)+, (RG)+ 
R642 


4$ 
#4, SFATAL 


(R2) 


R6 


: SEE IF BIT 0 OF CPUERR vay MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 

“MOV E SPECIAL POWER MONITOR FATAL # TO SFATAL 

:SET MSGTYP Hh Ae in ERROR 
POWER FOUND SET 


CE ERROR? 
; BRANCH OVER ERROR HALT ON SEQ ERROR JUMP Ir OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


3SIX SHOULD INCREMENT BY TWO 


;MOVE TO MAILBOX # suseeee 1 
“SET MSGTYP TO FATAL ERROR 
:R6 DID NOT AUTO INCREMENT BY TWO 
:TO SCOPE REPLACE HALT WITH 240 

AND REPLACE NEXT INST WITH 764 


eaeeaeae 


; SHOULD DECREMENT BY TWO 


2aeaaae 


;MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL ERROR 
:R6 DID NOT AUTO DECREMENT BY 2 
:TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 750 


ktkenae 2 


;DOUBLES AUTO INCREMENT OF R6 


aeeenee 35 eeeeere 


MOVE TO MAILBOX # 


LACE HALT WITH 240 
+ AND REPLACE NEXT INST WITH 736 


TEST INCREMENT OF R6 


aeagakcese 


:MOVE TO MAILBOX # seeaeee & 

: SET MSGTYP TO FATAL ERROR 
INCREMENT OF R6 

“10 SCOPE REPLACE HALT WITH 2 

+ AND REPLACE NEXT INST WITH 7 


epee we eee ee —_ ———«--=—--- = 


—=_ «= 


ae . — _—— _ 
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TEST #1 = TEST AUTO INC AND DEC OF R6 FOR WORD AND BYTES 





459 001054 005 CLR R4 
460 001056 1 2426 CMPB —s-« (RG) +, (RO) + : TEST INCREMENT OF R6 
461 001060 020627 000002 CMP R62 
462 001064 001405 BEO 5 
001066 012737 000005 000302 MOV #5. SFATAL :MOVE TO MAILBOX # *eaneee 5 seneene 
001074 005212 INC (R2) =SET MSGTYP TO FATAL ERROR 
001076 000000 HALT “WRONG INCREMENT OF R6 
*TO SCOPE REPLACE HALT WITH 240 
ca “AND REPLACE NEXT INST WITH 710 
464 001100 005006 S$: CLR R6 
465 001102 005004 CLR R4 
466 001104 122624 CMPB  —s- (R6) +, (R4)+ :TEST INCREMENT OF R4 
467 001106 020427 000001 CMP R41 
468 001112 001405 BEQ 6$ 
001114 012737 000006 000302 MOV #6. $FATAL :MOVE TO MAILBOX # exes 6 seaeeee 
001122 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001124 000000 HALT “WRONG INCREMENT OF R4 
>TO SCOPE REPLACE HALT WITH 240 
nai “AND REPLACE NEXT INST WITH 675 
470 001126 005006 6$: CLR R6 
471 001130 005004 CLR R4 
472 001132 122426 CMPB —s_-« (RG) +, (R6) + : TEST INCREMENT OF R6 
473 001134 020627 000002 CMP R6,H2 
474 001140 001405 BEQ 
001142 012737 000007 000302 MOV #7. $FATAL :MOVE TO MAILBOX # *teenee 7 seeneee 
001150 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001152 000000 HALT =WRONG INCREMENT OF R6 
:TO SCOPE REPLACE HALT WITH 240 
al “AND REPLACE NEXT INST WITH 662 
476 001154 005006 7$: CLR R6 
477 001156 005004 CLR R4 
478 001160 122426 CMPB —s-« (RG) +, (RO) + sTEST INCREMENT OF R4 
479 001162 020427 000001 CMP R4w1 
480 001166 001405 SEQ 8$ 
001170 012737 000010 000302 MOV #10, $FATAL :MOVE TO MAILBOX # tteeeee 10 seeeeee 
001176 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001200 000000 HALT : WRONG INCREMENT OF R4 
TO SCOPE REPLACE MALT WITH 240 
481 “AND REPLACE NEXT INST WITH 647 
482 001202 012706 001000 8$: MOV #1000,R6 
483 0012 124607 000000 C(MPB -(R6).#HERE : TEST DECREMENT OF R6 
484 001212 022706 000776 CMP #776,R6 
485 001216 001405 BEOQ TST2 
001220 012737 000011 000302 MOV #11. $FATAL -MOVE TO MAILBOX # teeeeee 1] eenanes 
001226 005212 INC (R25 -SET MSGTYP TO FATAL ERROR 
001230 000000 HALT “WRONG DECREMENT OF R6,OR WRONG S$TSTNM 


TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 633 


Pe ES IO ET LL LL LAL LLL LLL LLL LLL . 


a 
nel 


— — - oe eee 
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TEST #2 - TEST TRANSFER OF .BYTE USING R6 


486 -SBTTL TEST #2 - TEST TRANSFER OF .BYTE USING R6 


SRA AAAAEARAAAAAETTEAAAAARAERARAEAAEHEHRERHEKRAKRAAKARTAREAKRERKRAEAAAAAA AE 


“TEST 2 = TEST TRANSFER OF .BYTE USING R6 


“SARA AARAERAEEAARAEHEEAEAAARAAARARAAAREAERRRERARAAKAAEAKREHAAHEAKRE AAA AAA 


SEQUENCE 25 


001232 032737 000001 177766 TST2: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
001240 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
001242 012757 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
001250 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001252 600000 HALT =CPU POWER BIT FOUND SET 
001254 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
001262 005237 000304 100$: INC STESTN [UPDATE TEST NUMBER 
001266 022737 000002 000304 CMP #2. $TESIN > SEQUENCE ERROR? 
001274 001402 BEQ 1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
001276 000137 001600 —_ JMP TST3-12 “JUMP TO ERROR HALT ON SEQ ERROR 
487 001302 012737 123456 000636 MOV #123456,K5 
488 001310 012737 050505 000626 MOV #050505.k1 
489 001316 012705 000626 MOV #kK1R5 =R5=(050505)K1 
490 001322 012706 000636 MOV #k5 RO *R6=(1234656)K5 
491 001326 112625 MOVB  (R6)+,(R5)+ “LOW .BYTE OF R6 TO RS 
492 001330 022737 050456 000626 CMP #050456.k1 
493 001336 001405 BEQ 1$ 
001340 012737 000012 000302 MOV #12. $FATAL :MOVE TO MAILBOX # ‘*eeenee 12 seenees 
001346 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001350 000000 HALT “FALSE TRANSFER OF .BYTE 
*TO SCOPE REPLACE HALT WITH 240 
die ‘AND REPLACE NEXT INST WITH 753 
495 001352 012737 123456 000636 1$: MOV #123456,K5 
496 001360 012737 050505 000626 MOV #050505.k1 
497 001366 012705 000626 MOV #K1,R5 =R5(050505)K1 
498 001372 012706 000640 MOV #K6 RO *R6(123456)K5 
499 001376 114625 MOVB  -(R6),(R5)+ “LOW .BYTE OF R6 TO RS (DECREMENT) 
500 001400 023727 000626 050456 CMP K1, #050456 
501 001406 001405 BEQ 
001410 012737 000013 000302 MOV #13. $FATAL :MOVE TO MAILBOX # *eeeeee 13 seeeeee 
001416 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
001420 000000 HALT “FALSE R6 .BYTE TRANSFER 
“TO SCOPE REPLACE HALT WITH 240 
” ‘AND REPLACE NEXT INST WITH 727 
503 001422 012737 123456 000626 2%: MOV #123456,K1 
504 001430 012737 050505 000636 MOV #050505 ,k5 
505 001436 012705 000626 MOV #K1R5 (1234656) 
506 001442 012706 000636 MOV #k5.R6 = (050505) 
507 001446 112526 MOVB  (R5)+,(R6)+ “LOW OF RS TO LOW OF R6 
508 007450 022737 050456 000636 CMP #050456,k5 
509 001456 001405 BEQ 3$ 
001460 012737 000014 000302 MOV #14, SFATAL sMOVE TO MAILBOX # eexeene 14 teenere 
001466 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
001470 000000 HALT “FALSE R6 .BYTE TRANSFER 
‘TO SCOPE REPLACE HALT WITH 240 
_ “AND REPLACE NEXT INST WITH 703 
517 001472 012737 123456 000626 38: MOV #123456,K1 
3° 001500 012737 050505 000636 MOV #050505.K5 
513 001506 012705 000627 MOV #k1+1,R5 2123456 


ETT AE ee ET 


ee 


ws 
Or 
OWW 
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TRAPS MACRO 1113 
TRANSFER OF .BYTE USING R 


000636 
000636 
000015 


050647 
000302 


000626 
000636 


000626 
000302 


ae 10:05 


m 9 
PAGE 23-1 SEQUENCE 
#K5 RO :050505 
(R55+. (R6)+ “HIGH OF RS TO LOW OF R6 
KS .#050647 
#15. $FATAL :MOVE TO MAILBOX # senenee 15 teense 
(R2) *SET MSGTYP TO FATAL ERROR 


:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 657 


#123456.K1 

#050505.k5 

#ki+7,R5 ;R5-123456-ODD ADDRESS 

#k5R6 -R6-050505=-. EVEN ADDRESS 

(R6)+.,(R5)+¢ “LOW OF R6 TO HIGH OF RS 

#042656,K1 

#16,SFATAL :MOVE TO MAILBOX # seeeee8 16 *eeee¢0 
(R2) “SET MSGTYP TO FATAL ERROR 


OR WRONG $TSTNA 


5 
;T0 SCOPE REPLACE WALT WITH rei 


:AND REPLACE NEXT INST WITH 


LE AL LLG LLL LLL LL LOL LLL LLL LLL LLL LL LLL LLL LL LLL LLL LL LLL LL LLL LLL LLL LLL LL LE LLL LL LA TS 


526 
901612 
001620 
001622 
0016 
001632 
0016 
001642 
001646 
001654 
001656 
001662 
527 001662 
528 001670 
001976 
001700 
001702 
529 
530 001704 
531 001712 
001714 
001722 
001724 
532 
533 001726 
534 0017 
001736 
001744 
001746 
535 
536 001750 
537 001756 
001760 
001766 
001770 
538 001772 
539 002000 
002002 
OoShiS 
002012 
541 014 
542 $34 
2024 


CKKABDC 11/44 TRAPS 
TEST #3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


-SBTTL 


So 
Ww 


sc3 
Wn — PO 
NEN 
— As 
NmNOoO™N 


2 


VS 
=—Mmu 


—& MN 


"WOW WOWwWWw 
NNVIN NrUN™ 


S 


yNe~N 


3 
S 


MACRO M1113 


000001 
000177 
000001 
000304 
000003 
002070 
000642 
000017 


000643 
000020 


000645 
000021 


000644 
000022 


00064 3 
000023 


000644 
000024 


177766 
000302 


177766 
090304 


000643 


000302 


000642 
000302 


000642 
000302 


000640 
000302 


000645 
000302 


000645 
600302 


1ST3: 


100$: 


1000$: 


S$: 


6$: 


7$: 


9$: 
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SEQUENCE 


TEST #3 - TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


“SRSA RAeSEAAAEHAAAAEAASTEAEEEKAEARAEHRARAAARAREREAAEEAERAKAREHAAARAEAHRATAA AAA AEE 


“TEST 3 = TEST BYTE OPERATION WITH SEQ ODD-EVEN ADDRESS 


“SSSR RERERARAKRERAAAKEREEEAAAAATRHRERARARAREEAKREKRERARRERARRAAHRAAHAE AAA AeA 


BIT 


4 CPUERR 


00$ 
#177, SFATAL 
(R2) 


#1, CPUERR 
STESIN 

#3. $TESTN 
10008 
TST4=12 
K7,K7+" 


#17, SFATAL 
(R2) 


K7+1,K7 
#20, SFATAL 
(R2) 


K10+1,K7 
#21,$F ATAL 
(R2) 


K10,K6 


#22, $F ATAL 
(R2) 


K7+1,K10¢1 


#23, $FATAL 
(R2) 


lal 
#24, $F ATAL 


;SEE IF BIT O OF CPUERR — MONITOR BIT) IS SET 
:BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOVE ait POWER MONITOR FATAL # TO S$FATAL 


7SET MSGTYP TO FATAL ERROR 

:CPU POWER Blt FOUND SET 

: CLEAR THE BIT FOUND SET 
TE NUMBER 


[UPDATE TEST 
SEQUENCE ERROR? 
;BRANCH OVER ERROR HALT ON 7 — JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERR 


;SAME .WORD LOW TC HIGH 


MOVE TO MAILBOX # tanenee 17 
:SET MSGTYP TO FATAL ERROR 

: SHOULD COMPARE LOW TO HIGH 

3TO SCOPE REPLACE HALT WITH 240 

+ AND REPLACE NEXT INST WITH 766 


;COMPARE ODD TO .EVEN SAME .WORD 


:MOVE TO MAILBOX # seeneee 20 
:SET MSGTYP TO FATAL ERROR 
:0DD TO .EVEN .BYTE FAILURE 
:TO SCOPE REPL*®CE HALT WiTH 240 
:AND REPLACE NeXT INST WITH 755 


;SEQUENTIAL .BYTES 


;MOVE TO MAILBOX # teens 21 
:SET MSGTYP TO FATAL ERROR 

:0DD TO .EVEN FAILED 

:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 744 


geaeecaee 


szenaeeese 


gseneaneste 


geeeneeane 


sMOVE TO MAILBOX # steeere 22 

:SET MSGTYP TO feet ERROR 
;.EVEN TO EVEN FAILED 

:TO SCOPE REPLACE HALT WITH 240 

[AND REPLACE NEXT INST WITH 735 


geteeee 


MOVE TO MAILBOX # *xteeee 25 
;SET MSGTYP . FATAL ERROR 

:ODD TO ODD FAILED 

TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 722 


ceeeete 24 teaeeee 


sMOVE TO MAILBOX # 


ee ee eo 


27 


-—- 


CKKABDO 11/44 TRAPS MAC 


TEST # 


00008 000000 


737 000645 
493 
737 000025 
212 


000644 
000026 


res 
co 
Ss 
SSso 
~~ 
no 
[3a 
WIN Ww 
use 
r~NwuN 


OE  — 


RO M111 
- TEST BYTE OPERATION WITH 


3 


000645 
000302 


000643 
000302 


10$: 


11$: 


11-NOV-81 10:05 PAGE 24-1 
SEQ ODD-EVEN ADDRESS 


INC 
HALT 


a ee ee eee ee ee 


B 10 
SEQUENCE 


(R2) :SET MSGTYP TO FATAL ERROR 
: LOW TO HIGH IN SAME .WORD F AILED 
-TO SCOPE REPLACE HALT WITH 24 
:AND REPLACE NEXT INST WITH 711 
K1041,K10+1 
#25 ,SFATAL :MOVE TO MAILBOX # ‘*eeeeee 25 ttewewe 


(R25 “SET MSGTYP TO FATAL ERROR 


;HIGH TO LOW IN SAME . AILED 
:T0 SCOPE REPLACE HALT “uITH "340 
;AND REPLACE NEXT INST WITH 


wer 
#26,$FATAL sMOVE TO MAILBOX # ‘seeaeee 26 seeKeee 
(R2) :SET MSGTYP TO FATAL 


ERROR 
-EVEN TO ODD FAILED,OR WRONG STSTNM 
:T0 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 667 


oo eee ee + 


28 
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CKKABDO 11/44 
TEST #6 = 


549 


— — 
x ° 


Wu 
Wu 
Nm=-O 


SSSsessssesssss 


sc ee el el el eel ee ee eed aed 


g 
$ 


a 
ae 
ss 
00 

554 002204 
» 04 
B05 1% 
002216 

555 009380 


ae 


TRAPS 
TEST THE CC BITS 


aS 
mNM 


if 


Scs 
~ 
win 
Nm 
— 
NNW 


yun NN 


MACRO 11135 


177776 
000027 


000030 


000031 


000032 


000017 


000033 


000034 


177766 
000302 


177766 


000304 


000302 


000302 


000302 


000302 


177776 


000302 


000302 


—_——_—_— — -————— 
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Cc 10 
SEQUENCE 


-SBTTL TEST #4 = TEST THE CC BITS 


FAA AAAEAAAAAAAAEAAE TERE EAE AAAAAARAAARAERARERERAEEAAAEAEEAHAAEAAAAEAA AREAS 


:TEST 4 - TEST THE CC BITS 


PPOrrrrrTrTTTTTITITITITITITIIT LILI LLL LiLiLiLLiLisili itil 


tSTé: 


100$: 


18: 


2$: 


3$: 


4$: 


5$: 


BIT 


HALT 


#1, CPUERR 


1 
Sessa 
(R2) 


#1 —— 


STESTN 
#4, $TESTN 
TST5-12 


STATUS 


#27,S$FATAL 
(R2) 


2$ 
#30, $FATAL 
(R25 


3$ 
#31, $FATAL 
(R2) 


‘3 SFATAL 
(a3 


#17, STATUS 


5$ 
#33, SFATAL 
(R25 


6$ 
#34, SFATAL 
(R25 


; SEE IF BIT 0 OF CPUERR ran MONITOR BIT) IS SET 
AROUND CLEAR AND HALT IF CLEAR 
AL POWER MONITOR FATAL # TO SFATAL 


; ES 

; SEQUENCE ERROR? 

:BRANCH TO ERROR HALT ON SEQ ERROR 
:SET STATUS 

= CLEAR STATUS 


sMOVE TO MAILBOX # **eeee" 27 
: SET “a te TO FATAL ERROR 


:C NOT CLEAR 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 766 


aeeeananne 


gaeaeane 


sMOVE TO MAILBOX # seaeexe 30 
:SET MSGTYP TO FATAL ERROR 
T CLEAR 


V_NO 
‘To SCOPE REPLACE HAIT WITH 240 
SAND REPLACE NEXT INST WITH 760 


geezaenee 


MOVE TO MAILBOX # seaxeee 3] 
:SET MSGTYP TO FATAL ERROR 


:2 NOT CLEAR 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 752 


geaeeane 


sMOVE TO MAILBOX # ‘ttanxeee 32 
:SET MSGTYP TO FATAL ERROR 
:N NOT CLEAR 


:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 744 
:CLEAR CONDITION CODES 

:SET STATUS TO ONES 


eeaeaanene 


MOVE TO MAILBOX # *teenae 53 
7 SET a hg TO FATAL ERROR 


:C NOT SE 
:TO SCOPE REPLACE HALT WITH $39 
SAND REPLACE NEXT INST WITH 732 


ageneaeee 


sMOVE TO MAILBOX # txeene% 
:SET MSGTYP TO FATAL ERROR 


:V_NOT SET 
>TO SCOPE REPLACE HALT WITH 240 


meme oem er 


29 





ee ee oe 


D 10 
CKK KABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 25-1 SEQUENCE 30 
T TEST #4 = TEST THE CC BITS 


zAND REPLACE NEXT INST WITH 724 


561 7% 6$: 
7 001405 BEQ 7$ 
76 tA 7 000035 000302 MOV #35 ,SFATAL sMOVE TO MAILBOX # s«eenene 35 seneeee 
005212 INC (R25 =SET MSGTYP TO FATAL ERROR 
00 000000 HALT 


:Z NOT S 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 716 


562 002310 7$: 
% 1 Hi gs'2) BM! TSTS 
12 0127 000036 000302 MOV #36,SFATAL :MOVE TO MAILBOX # steanne 36 teeeeee 
09 $ 00521 aay (R2) : SET ae hg TO FATAL ns 


N NOT SET,OR WRONG $TSTNM 
0 SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 710 


ee 


| £ 10 
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— ew oo | wee ——_ A LT VT 


TEST #5 = TEST THAT A TRAP OCCURS ON A RESERVED INS 
563 -SBTTL TEST #5 - TEST THAT A TRAP OCCURS ON A RESERVED INS 


FERRARA AAAAAAAA RAAT AEA EATER AAAAAEAAARAAARARERERAAAEAEARERAEAAAEEERAERETS 


:TEST 5 - TEST THAT A TRAP OCCURS ON A RESERVED INS 


WPPOTTTTITTITTITITILILI LILI LI LLL LLL LLL Lit 











| 
002324 032737 000001 177766 TSTS: BIT #1,CPUERR ; SEE IF BIT 0 OF CPUERR vo ge MONITOR BIT) IS SET 
00 001410 BEQ CH AROUND CLEAR AND HALT IF CLEAR 
00 Orel> 000177 000302 MOV #177, SF ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
eS ¢ 005212 ae (R2) a: 4 ao a Ht FATAL ERROR 
00 eh ? 000001 177766 BIC #1, CPUERR :CLEAR THE BIT FOUND SET 
002354 00 4 7 000304 100$: INC STESTN : UPDATE 
00 022737 000005 000304 CMP #5,$TESTN : SEQUENCE ERROR? 
00 1006 BNE 1$ ;BRANC OR + ON SEQ ERROR 
564 % pis tNS 000500 MOV #BUFF ,SP :STACK POINTER 
565 74 0127 002416 000010 MOV #2$,RTRAP sRETURN LOCA flow 
296 » rey 000010 - TRAPA “RESERVED INSTRUCTION, SHOULD TRAP 
002404 012737 000037 000302 MOV #37, SFATAL :MOVE TO MAILBOX # ‘*«#eeene 37 seneene 
002412 005212 INC (R2) SET MSeTYP TO FATAL ERROR 
002414 000000 HALT ; RESERVE INSTRUCTION DIDN'T TRAP,OR WRONG $STSTNM 
-TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 764 
568 002416 2$: 


31 
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a 


#6 - TEST DEC OF STACK POINTER ON A TRAP OPERA 
-SBTTL TEST #6 - TEST DEC OF STACK POINTER ON A TRAP OPERATI 


{RARER AAAAAAAAAAEAAAAAEAAAAER AAA AAAEARAAAARERAERERRAEARAKE RARER AAR ERAT AHA TS 


:TEST 6 - TEST DEC OF STACK POINTER ON A TRAP OPERATI 


PPPOTTTTTTITTTITTI TLL LLL LLL LLL LLL LLL LLL LLL 


_ 
oro 


Bee 
Win 
NN NONMNS 


~—WAIWWNOD Ws 


ass 


ne 


& 
© 


gasseasoosess 
RENSESs 


PIAA 
fuwn—o 


—_ 
“NIN raIwonN 


—WOo 
MNUNOS 


000001 
000177 


sia it 
000 

000006 
000500 
002476 


000474 
000040 


177766 
000302 


177766 
000304 


000010 


000302 


iST6: 


100$: 


1$: 


11-NOV-81 10: ¢: PAGE 27 
TION 


#1, CPUERR 
os SFATAL 


1, CPUERR 


Waurr.s 
#1$,RTRAP 
SP ,ABUF F -4 


TS 
#40, $FATAL 
(R25 


SEQUENCE 


SEE IF BIT 0 OF CPUERR vee MONITOR BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF CLEAR 

;MOVE SPECIAL POWER OR FATAL # TO SFATAL 

:SET MSGTYP TO edd | ERROR 
:CPU POWER BIT FOUND S 
:CLEAR THE a FOUND SET 
SUPDATE TEST NUMBER 

: SEQUENCE ERROR? 

;BRANCH TO ERROR HALT ON SEQ ERROR 
;STACK POINTER SETUP 
URN POINTER 










:RE IN 
;RESERVED INSTRUCTION 
TEST DECREMENT OF SP 


tenaneer £0 seeeeee 


sMOVE TO MAILBOX # 


32 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 28 SEQUENCE 
TEST #7 = TEST THAT PROPER P.C. IS SAVED 
575 _SBTTL TEST #7 - TEST THAT PROPER P.C. IS SAVED 
{REAR AA AAA EE AERA RETA AEA AREA AEA AAA RARER A RATA ERA ERERE RAE RA RARER ES 
“TEST 7 - TEST THAT PROPER P.C. IS SAVED 
POPS Ce TTT TTT TTT TTT TTT TITI TITTLE LILLIE LLL LL. 
002516 032737 000001 177766 ist7: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
002524 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLE 
002526 012757 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
002534 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
002536 000000 HALT : R 
002540 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
002546 005237 000304 100$: INC $TESIN “UPDATE TEST NUMBER 
002552 022737 000007 000304 CMP 7. $TESTN = SEQUENCE ERROR? 
0025 1012 BNE S710-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
576 002562 12706 000500 MOV pBUFF SP :STACK POINTER SETUP 
57 00 566 012737 002576 000010 MOV #1$,RTRAP “RETURN FROM TRAP POINTER 
578 002574 000010 TRAPA “TRAP ON THIS INSTRUCTION 
579 002576 022737 002576 000474 1$: CMP #1$,BUFF-4 “CHECK FOR INCREMENTED P.C. 
580 002604 001405 BEQ TSTIO 
002606 012737 000041 000302 MOV #41,$FATAL sMOVE TO MAILBOX # *seeanee 84] teeneee 
002614 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002616 000000 HALT ‘INCORRECT P.C.,08 WRONG $TS 
*TO SCOPE REPLACE HALT WITH oO 


ZAND REPLACE NEXT INST WITH 760 


oo 


———— mnie eines 


H 10 


r--—- 


: 


| CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 29 
TEST #10 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


581 -SBTTL TEST #10 ~- TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


FER AEAEEAAREAAAAAEAAERAAREAAAAEAAEAEAEAERAERAAAERAAARAEAERAEAERAEAERHERE REESE 


:TEST 10 - TEST THAT “‘OLD'’ CC AND PRI ARE PLACED ON STACK 


WPPOTTTTTITITITITI LILI LLL LILLIE LLLL LLL LLL LLL LLL) 


SEQUENCE 


——— nnn itn eee 


002620 032737 000001 177766 iST10: BIT #1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
002626 001410 BEQ 106$ CH AROUND CLEAR AND HALT IF CLEAR 
0026 012757 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
002636 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002640 HALT =CPU POWER BIT FOUND SET 
00 642 042737 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
00265 7 000304 100$: INC STESTN ‘UPDATE TEST NUMBER 
00 654 022737 000010 000304 CMP #10 STESTN * SEQUENCE ERROR? 
662 001046 BNE sTit~ 12 sBRANCH TO ERROR HALT ON SEQ ERROR 
582 00 664 012706 000500 MOV *BUF FSP :SET UP 
583 002670 0127 0027 000010 MOV ais, RTRAP *SET UP 
584 002676 005037 177776 CLR “CLEAR CC AND PRICRITY 
585 002702 000257 CCC 
586 002704 000010 TRAPA : TRAP 
587 002706 023727 000476 000000 1S: CMP BUFF-2,40 “TEST THAT OLD STATUS WENT TO STACK 
588 002714 001405 BEQ 
002716 012737 000042 000302 MOV #42 ,$FATAL sMOVE TO MAILBOX # ‘*seeanne 42 teanene 
002724 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002726 000090 HALT ; INCORRECT STATUS 
TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 755 
589 002730 012706 00050 2$: MOV #BUFF SP “SET UP 
002 012737 002754 000010 MOV #3$,RTRAP -SET UP 
591 002742 012737 000357 177776 MOV #357,CC “SET PRIORITY 
592 002750 000277 SCC “SET CC 
593 002752 000010 TRAPA : 
594 002754 023727 000476 000357 3S: CMP BUFF-2, #357 *COMPARES STATUS ON STACK 
595 002762 000405 BR $ ‘BRANCH OVER ERROR #177 
596 O59 m6as5 000043 000302 MOV 443 ,SFATAL : TO MAILBOX # seenaxe 43 xenenen 
002772 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
002774 000000 HALT -THIS ERROR RESERVED FOR PWR MON BIT ERROR 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 732 
597 002776 4$: 
002776 001405 BEQ TST11 
00 012737 000044 000302 MOV #44, $FATAL :MOVE TO MAILBOX # exeeeee 44 eeeneee 
00 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
003010 000000 HALT : INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
*T0 SCOPE REPLACE HALT WITH 240 





:AND REPLACE NEXT INST WITH 724 


a - - 


34 
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CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 30 SEQUENCE 35 
TEST #11 = TEST THAT "NEW’’ STATUS IS CORRECT 
598 _SBITL TEST #11 = TEST THAT "NEW'’ STATUS IS CORRECT 
EAA AAAEAAAATAAAARERAREAEARAEAERERERAARAAAERAAEREARRAERAARAERAERAEER EAE AEES 
“TEST 11 = TEST THAT “'NEW’’ STATUS IS CORRECT 
REESE AAAAAAEAREAAATEAAAAAEARAARERARAAAAAARAEREAAERARERARAAAAAAHEEAAAEE 
003012 032737 000001 177766 TST11: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET . 
003020 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
003022 012737 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
00 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003032 000000 HALT =CPU POWER BIT FOUND SET 
00 0427 1 177766 BIC #1, CPUERR *CLEAR THE BIT FOUND SET 
003042 00 237 000304 100$: INC STESIN “UPDATE TEST NUMBER 
003046 022737 000011 000304 CMP #11,$TESTN * SEQUENCE ERROR? 
003054 402 BEQ 1006$ ;BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
003056 000137 003324 — JMP 12$ : JUMP TO ERROR HALT ON SEQ ERROR 
599 00 012706 MOV #BUFF ,SP 
600 00 012737 003102 000010 MOV #1$,RTRAP 
601 003074 005037 CLR RTRAP+2 :CLEAR FUTURE PRIORITY AND CC 
602 003100 000010 TRAPA 
603 00310¢ 1$: :TEST FOR "'C’’ CLEARED 
604 003102 100005 BPL 2$ 
003104 012737 000045 000302 MOV #45, $FATAL :MOVE TO MAILBOX # *#eexne 45 sxennen 
003112 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
003114 000000 HALT N NOT CLEARED 
70 SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
605 003116 23: 
003116 001005 BNE 3$ 
003120 012737 000046 000302 MOV #46, $FATAL :MOVE TO MAILBOX # *eeenee 46 seeeere 
003126 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
003130 000000 HALT :2 NOT CLEARED 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 753 
606 003132 3$: 
003132 102005 BVC 4$ 
003134 012737 000047 000302 MOV #47, $F ATAL :MOVE TO MAILBOX # *eeeeee 47 sxeeeeee 
003142 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
003144 000000 HALT V NOT CLEARED 
‘To SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 745 
607 003146 4$: 
003146 103005 BCC 5$ 
003150 012737 000050 000302 MOV #50, $FATAL :MOVE TO MAILBOX # teeeeee 50 xeeenee 
003156 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
103160 000000 HALT -C NOT CLEARED 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 737 
0031 2 032737 000340 177776 5$: BIT #340,CC “TEST PRIORITY 
3170 001405 BEQ 
003172 012737 000051 000302 MOV #51,$FATAL :MOVE TO MAILBOX # teeenee 51 eeneene 
003200 005212 INC (R25 *SET MSGTYP TO FATAL ERROR 
003202 000000 HALT ;PRIORITY NOT zE 


RO 
;TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 726 


003204 015708 000500 6$: MOV 7. 
Oe 10 012737 003226 000010 MOV $,R 
00 012737 357 000012 MOV 1357, Mke.2 SET NEW ‘'CC’* AND PRIORITY 





a crc ee re we ne 
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ABDO 11/44 TRAPS MACRO M1113 ayo 10:05 PAGE 30-1 SEQUENCE 36 


T #11 = TEST THAT ‘NEW’ STATUS IS CORRECT 
613 003224 000010 TRAPA : TRAP HERE 
614 003226 7$: 
003226 0940 QM] 8$ 
003 30 0127 7 000052 000302 MOV #52, $FATAL :MOVE TO MAILBOX # seeeeen 52 seneene 
00 212 INC (R25 *SET MSGTYP TO FATAL ERROR 
003240 HALT *N NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 707 
615 003242 8$: 
003242 001405 BEQ 9$ 
003244 012737 000053 000302 MOV #53, $FATAL :MOVE TO MAILBOX # teens 53 cannes 
003252 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003254 000000 HALT :2 NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 701 
616 003256 9$: 
003256 102405 BVS 10$ 
003260 012737 000054 000302 MOV #54.$FATAL :MOVE TO MAILBOX # *enwee 54 seeeeee 
003266 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
003270 000000 HALT V NOT SET 
IOS aD AaETaCGE sh UH 24 
617 003272 10$: 
003272 10340 BCS 11$ 
0032. 012737 000055 000302 MOV #55. $FATAL :MOVE TO MAILBOX # seeeeee 55 eenenes 
003302 0052 INC (R2) *SET MSGTYP TO FATAL ERROR 
003304 0000 HALT *C NOT SET 
310 Stare BEPLACE WALT wiTH 269 
618 003306 013706 177776 11$: MOV CC,SP 
619 003312 042706 000017 BIC #17,SP 
620 003316 022706 000340 CMP #340,SP 
621 003322 0014 BEQ 13$ 
003324 12$: 
003324 012737 000056 000302 MOV #56, SFATAL :MOVE TO MAILBOX # *eneee 56 seeeene 
003332 0052 INC (R2) “SET MSGTYP TO FATAL ERROR 
003334 000000 HALT *PRIORITY WAS CHANGED,OR WRONG STSTNM 
:TO SCOPE REPLACE WALT WITH 260 
622 003336 012737 000012 000010 13$: MOV #12,10 
623 003344 005037 000012 CLR 12 


—— +--+ + ~~ + 
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| CKKABDC 11/44 TRAPS MACRO M1113 _11-NOV-81 10:05 PAGE 31 SEQUENCE 
TEST #12 = TEST THAT A TRAP OCCURS FOR A “'TRAP’’ INSTRUCTION 
624 _SBTTL TEST #12 - TEST THAT A TRAP OCCURS FOR A “‘TRAP’’ INSTRUCTION 
RARER EAAEEAAAAAEERERERAEEAAEARAAAAAAAAAAAEAARAAEAAEEAERAERAAERERETEREES 
“TEST 12 - TEST THAT A TRAP OCCURS FOR A ‘‘TRAP’’ INSTRUCTION 
PPPerrrrrrrTreTTrTTTTTTITITITITITITILITLILLL LL LLL LL LiL 
003350 032737 000001 177766 isT12: BIT #1, CPUERR :SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
003356 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
00 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
003 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003370 000000 HALT :CPU POWER B 
003372 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
003400 005237 000304 100$: INC STESIN “UPDATE TEST R 
003404 022 37 000012 000304 CMP #12 STESTN “SEQUENCE ERROR? 
003412 001013 | BNE TST13=12 :BRANCH TO ERROR HALT ON SEQ ERROR 
625 003414 012737 000012 (010 MOV #12,10 
626 003422 005037 000012 CLR 12 
627 0054 : 012706 000500 MOV #RUFF SP ; STACK POINTER SETUP 
628 00 012737 003454 000034 MOV #1$,.RTRAP1 TURN LOCATION 
629 003440 104400 TRAP “RESERVED INSTRUCTION, SHOULD TRAP 
630 003442 012737 000057 000302 MOV #57, $F ATAL “MOVE TO MAILBOX # ‘seeanee 57 searnne 
003450 005212 INC (Re) :SET MSGTYP TO FATAL ERROR 
003452 000000 HALT “TRAP DIDN'T TRAP,OR WRONG STSTNM 


:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 757 
631 003454 1$: 


Cee Enel 


37 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10: + PAGE 32 SEQUENCE 
TEST #13 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 
632 -SBTTL TEST #13 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SORES EEAAAAAAAAARAAETAHEARAAAAAAAAHAAEARAAARAKERAKRAKRAAKRAAARARARERAEAA AAA AEE 


“TEST 13 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


“SRA AOSAAAEAAAARARAAEAEAEAAAAEAARERARERAARERAERHRAKRAKRAAAAAAAAAAAARAAHAEAAA AAA 






003454 032737 000001 177766 S113: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
003462 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
003464 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
003472 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
003474 000000 HALT *CPU POWER BIT FOUND SET 
003476 042737 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
003504 005237 000304 100$: INC rises “UPDATE TEST NUMBER 
003510 022737 000013 000304 CMP STESTN = SEQUENCE ERROR? 
003516 001011 BNE sti 4-1 sBRANCH TO ERROR HALT ON SEQ ERROR 
633 003520 012706 000500 MOV pBUF . ss ; STACK POINTER SETUP 
634 093524 012737 003534 000034 MOV #1$,RTRAP1 “RETURN POINTER 
635 003532 104400 TRAP “RESERVED INSTRUCTION 
636 003534 020627 000474 1$: CMP SP, ABUF F -4 :TEST DECREMENT OF SP 
627 003540 001405 BEQ TST14 
003542 012737 600060 000302 MOV #60, SFATAL :MOVE TO MAILBOX # *eeenee 60 seeecee 
003550 005212 INC (R25 “SET MSGTYP TO FATAL ERROR 
003552 000000 HALT ;NOT DECREMENTED TWO .OR WRONG $TSTNM 
SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 


mm a a ee es 


CKEABDO 11/46 TRAPS maCRO 1113 11-NOV-81 10:05 PAGE 33 " SEQUENCE 
TEST #14 = TEST THAT PROPER P.C. IS SAVED 


638 .SBTTL TEST #14 = TEST THAT PROPER P.C. iS SAVED 


RRARAAAAAAAAAAAAEAAERSEAE TERA ARAAAAERAAAARERAAAAAEARAE ERATE ARAAENAAEAATS 


-TEST 14 = TEST THAT PROPER P.C. IS SAVED 


WPPOTTTTTTITITTITITILIT TILL LILI Li LiL, 





003554 032737 000001 177766 iST14: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
003562 001410 BEO 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
00 364 01275 000177 000302 MOV #177, SFATAL IAL POWER MONITOR FATAL # TO $FATAL 
003572 005212 INC (R2) ERROR 
003574 900000 HALT SET 
003576 0427 000001 177766 BIC #1, CPUERR SET 
00 00 237 000304 100$: INC STESIN 
003610 022 37 000014 000304 CMP #14 STESTN ? 
00361 1012 BNE TST15=12 sBRANCH TO ERROR HALT ON SEQ ERROR 
639 00 012706 000500 MOV #BUF F $ : STACK POINTER SETUP 
640 003624 012737 003634 000034 MOV Fis RTRAP “RETURN FROM TRAP POINTER 
641 003632 104400 TRAP > TRAP ON THIS INSTRUCT ION 
642 003634 022737 003634 000474 1S: CMP #1$. BUFF -4 *CHECK INCREMENTED P.C. 
643 003642 001405 BEQ TST15 
003644 012737 00061 000302 MOV #61, $FATAL :MOVE TO MAILBOX # seeneee 6] sence 
003652 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003654 000000 HALT : INCORRECT P.C..0R WRONG $STSTNM 


:TO0 SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


— ee ee = - —_ eee ee eee ee —_—— oo ee —_— ee 
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KKABDC 11/4646 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 34 SEQUENCE 40 


rEST #15 = TEST THAT “OLD’’ CC AND PRI ARE PLACED ON STACK 
644 .SBTTL TEST #15 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


see eaeareeeaerereareaeeretereeeeraaranaaaaananaeataneeaneeaaaeageanranaraneee 


:TEST 15 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


WPPTTTTTTTITITITITILITT LITLE LLL LLL Li LLL iii iii 


003656 032737 000001 177766 iST15: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
00 001410 BEQ ; CH AROUND CLEAR AND HALT IF CLEAR 
00 01273 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
003674 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
003676 HALT BIT F SET 
003700 04 000001 177766 BIC #1, CPUERR :CLEAR THE BIT FOUND SET 
003706 00 é 7 000304 100$: INC STESIN SUPDATE TEST NUMBE 
00371 022 7 000015 000304 CMP #15 STESTN *SEQUENCE ERR 
0037 1037 BNE stig -1 : BRAN i TO ERROR HALT ON SEQ ERROR 
645 0037 2 012706 000500 MOV *BUF ee: :SET UP 
646 003726 012737 003744 000034 MOV #1$,RTRAP1 -SET UP 
647 0037 005037 177776 CLR CC *CLEAR CC AND PRICRITY 
648 003740 000257 CCC 
649 003742 104400 TRAP : TRAP 
650 003744 023727 000476 000000 1$: CMP BUFF -2,#0 “TEST THAT OLD STATUS WENT TO STACK 
651 003752 001405 BEQ 
003754 012737 000062 000302 MOV #62, $F ATAL :MOVE TO MAILBOX # teeenee 62 cannons 
003762 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
003764 000000 HALT : INCORRECT STATUS 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
652 003766 012706 000500 2s: MOV #BUFF SP “SET UP 
653 003772 012737 004010 000034 MOV #3$. RTRAPI =SET UP 
654 004000 012737 000357 177776 MOV #357,CC *SET PRIORITY 
655 004006 104400 TRAP :§ 
656 004010 023727 000476 000357 3S: CMP BUFF -2,4#357 “COMPARES STATUS ON STACK 
657 004016 001405 BEQ TST 
00402C 012737 000063 000302 MOV #63, $FATAL :MOVE TO MAILBOX # teeneee 63 eeeneee 
004026 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004030 000000 HALT 


Ne 


S INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 733 


ee a ee ee 





cay 11/44 TRAPS 
#16 - TEST THAT ‘NEW’ STATUS IS CORRECT 


-SBTTL TEST #16 = TEST THAT ‘NEW’ STATUS IS CORRECT 


EERE AEEAEAEAAEEAEAEEEAAAAAAAAEARARAAEAAAAEAREAEEREAARARAEAAAARAAAAARARE 


“TEST 16 = TEST THAT "'NEW'’ STATUS IS CORRECT 


REE AAAEAAEAEAEEAEAEREEAREEAERAEERAEEARERAEAAEARAEAEAAAEREREERARAREAEARAHREEEAEESE 


3SEE IF BIT 0 OF CPUERR os MONITOR BIT) IS SET 
H AROUND CLEAR 


658 


004102 


Oo 
Vw 
oO 


PERES 
RERRRERRE 


g. 


Seee5 
SESS | KCRRNBERS 
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SRER RRRER 
Syasse  FAENS 
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ss 


See Reree PERE 
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MmNVIN 


MACRO M1113 


000001 
000177 


000001 
000304 
000016 


004344 


000500 
004122 
000036 


000064 


000065 


000066 


000067 


000340 
000070 


000500 
poses 
000357 


177766 
000302 


177766 


000304 


000034 


000302 


000302 


000302 


000302 


177776 
000302 


000034 
000036 


TST16: 


100$: 


1000$: 


18: 


2$: 


3$: 


4$: 


5$: 


6$: 


11-NOV-81 10:05 PAGE 35 


#1, CPUERR 


HN. SFATAL 


#1,CPUERR 
STESTN 
#16,$TESTN 
1000$ 
TST17=12 


#BUFF ,SP 
#1$, RTRAP1 
RTRAP1+2 
2$ 

#64 ,SFATAL 
(R2) 


3$ 
#65, $FATAL 
(R2) 


4$ 
#66, $F ATAL 
(R2) 


5$ 
#67, SFATAL 
(R25 


#340,CC 


#70, $FATAL 
(R25 


#BUF 
478, 


AP1 
473.) RTRAP#2 





ANCH AND HALT 
;MOVE SP 
:SET MSGTYP TO FATAL ee 
OWE FOUND SET 


; UPDATE 
s SEQUENCE ERROR? 


SEQUENCE 


CL IF CLEAR 
AL POWER MONITOR FATAL # TO SFATAL 


;BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


;CLEAR FUTURE PRIORITY AND CC 
;TEST FOR ‘'C’’ CLEARED 


sMOVE TO MAILBOX # ‘eaeaae 64 
;SET MSGTYP TO FATAL ERROR 

:C NOT CLEARED 

[TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 761 


sMOVE TO MAILBOX # teexeee 65 
:SET MSGTYP TO FATAL ERROR 

:Z NOT CLEARED 

:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 753 


sMOVE TO MAILBOX # *eeeeee 66 
:SET MSGTYP TO FATAL ERROR 
:V_NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 745 


sMOVE TO MAILBOX # teeeaee 67 

:SET MSGTYP TO #aTAL ERROR 

:C NOT CLEARE 

:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE aid INST WITH 737 

“TEST PRIORITY 


:MOVE TO MAILBOX # ‘*«eeeeee 70 
SET < ye TO oom ERROR 


:PRIORITY NOT ZER 
:TO SCOPE REPLACE HALT WITH 240 


:AND REPLACE NEXT INST WITH 726 


SET NEW "'CC’* AND PRIORITY 


ea2eaeneae 


ageaeeanee 


seenane 


egeeaeeee 


eeeneene 


41 
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 CKKABDO 11/44 TRAPS 





eee ee wen ae a —_—— ——- += 


MACRO M1113 11-NOV-81 10:05 PAGE 35-1 SEQUENCE 42 
TEST #16 = TEST THAT ‘NEW’’ STATUS IS CORRECT 
673 004244 104400 TRAP : TRAP HERE 
674 004246 7$: 
675 004246 100405 BMI 8$ 
50 012737 000071 000302 MOV #71, $FATAL :MOVE TO MAILBOX # *#eeeee 71 sreeeee 
56 00521 INC (R25 SE MSGTYP TO FATAL ERROR 
004260 HALT N NOT SET 
*TO SCOPE REPLACE HALT WITH 340 
“AND REPLACE NEXT INST WITH 707 
676 004262 8$: 
004 001405 BEQ 9$ 
004264 ar Let 000072 000302 MOV #72, $F ATAL sMOVE TO MAILBOX # *eeeeee 72 teteene 
004272 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004274 000000 HALT T SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 701 
677 004276 9$: 
004276 102405 BVS 10$ 
004 012737 000073 000302 MOV #73,$FATAL :MOVE TO MAILBOX # «*enexe 73 xeannee 
004306 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004310 000000 HALT :V NOT SET 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 673 
678 004312 10$: 
004312 103405 BCS 11$ 
004314 012737 000074 000302 MOV #74 ,SFATAL :MOVE TO MAILBOX # “«eeeeee 74 teeeene 
004322 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004324 000000 HALT :C NOT SET 
iA REPLACE REST nS HTH 868 
679 004326 (13706 177776 11$: MOV Cc,SP 
680 004332 042706 000017 BIC #17.SP 
681 004336 022706 000340 CMP #340 SP 
682 004342 001405 BEQ 11? 
004344 012737 000075 000302 MOV Be SF ATAL :MOVE TO MAILBOX # sxeeeee 75 setenee 
004352 005212 INC (R2) =SET MSGTYP TO FATAL ERROR 
004354 000000 HALT “PRIORITY WAS CHANGED,OR WRONG $TSTNM 
=TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 651 


A A . 


CC A LLL LLL LL — ~_ 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV~81 10: 0 —_ 36 SEQUENCE 43 
TEST ni? TEST THAT ALL COMB ‘‘TRAP’’ WILL CAUSE A T 
683 -SBTTL TEST #17 - TEST THAT ALL COMB ‘‘TRAP*’ WILL CAUSE A TRAP 


REAR AEEEEAAERAAEAEEEEAEAEEEEEARAEAEAARARAAAEEAEAAEAEREREREAE AAAS 


“TEST 17 - TEST THAT ALL COMB ‘TRAP’' WILL CAUSE A TRAP 


REA AEAAAAAAAAERAEEEEAEAAEEAK! CHRERTARARARARAAAAAAERARAKEAAREKAKREAAAAAAAAAAAEE 





000500 1$: MOV #BUFF ,SP ;SET UP STACK POINTER 
¢s: TRAP ;TRAP INST WILL BE MODIFIED TO TRAP+377 


000076 000302 , MOV #76, $FATAL sMOVE TO MAILBOX # ‘te#eenee 76 senenee 
INC (R25 “SET MSGTYP TO FATAL ERROR 
- PRE LED TO TRAP “OR WRONG $TSTNM 


SAND REPLACE NEXT INST WITH 761 
004442 4$: INC 2$ : INCREMENT TRAP INSTRUCTION 
104777 004442 #104777 ,2$ :TRAP+377 TO UPPER LIMIT 


HAVE WE TESTED ALL 
000036 000034 MOV #36, 34 
000036 CLR 36 


004356 032737 000001 177766 TST17: BIT #1, CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
004 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
004 01273 000177 000302 MOV #177, $FATAL :MOVE S$ PECIAL POWER MONITOR FATAL # TO SFATAL 
4 212 INC (R2) “SET MSGTYP TO F RROR 
004376 HALT “CPU POWER ET 
004400 04 1 177766 BIC #1, CPUERR “CLEAR THE BI ET 
bt 7 000304 100$: INC STESIN “UPDATE TEST 
41 022 7 000017 000304 CMP #17, $TESTN : SEQUENCE ERROR? 
1011 BNE 4 “BRANCH TO ERROR HALT ON SEQ ERROR 
Or 37 104400 004442 MOV HTRAP,2$ s INITIALIZE BASE TRAP INSTRUCTION 
4 7 004456 000034 MOV #4$, 34 “RETURN FROM TRAP TO RAT 
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TEST #20 = TEST THAT A TRAP OCCURES ON AN “‘IOT’’ INSTRUCTION 
694 .SBTTL TEST #20 - TEST THAT A TRAP OCCURES ON AN “‘IOT’’ INSTRUCTION 


SSAA AAEAAAAAERAAEEEEAREATEEEAEAEEARARARAEEAAAEAARAAAAARAARAAAAAAAAAAAAARAEAAAAAS 


“TEST 20 - TEST THAT A TRAP OCCURES ON AN “‘IOT’' INSTRUCTION 


—_—_—_——————— 


REAR EAAEEAERARAEEEEEEEEEAEEERAREREREREREREREAEAAEEAEARERAREARAAAEATEEEAAEENE 








004504 032737 000001 177766 TST20: BIT #1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
12 001410 BEQ CH AROUND CLEAR AND HALT IF CLEAR 
004514 012757 000177 000302 MOY #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
004522 12 INC (R2) “SET MSGTYP To F ATAL ERROR 
004526 HALT =CPU POWER BIT SET 
004526 04 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
0045 7 000304 100$: INC STESTN “UPDATE TEST NUMBER 
004540 022737 000020 000304 CMP #20 STESTN > SEQUENCE ERROR? 
004546 001006 BNE set 1-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
695 004550 012706 000500 MOV yBUr ef :STACK POINTER SETUP 
696 $54 012737 006576 000020 MOV #1$,RTRAP2 “RETURN LOCATION 
69 $62 10T “RESERVE INSTRUCTION, SHOULD TRAP 
698 004564 012737 000077 000302 MOV #77,$FATAL “MOVE TO MAILBOX # ‘*tenene 77 seeeeee 
004572 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
004574 HALT 3107 DIDN'T TRAP,OR WRONG $TST 
“TO SCOPE REPLACE HALT WITH 50. 
“AND REPLACE NEXT INST WITH 764 
699 004576 1$: 


11/44 TRAPS 


700 


000021 


06 000500 
37 004656 


: 000474 
: 000100 
0 


: 


| 
| 
004616 000000 
004620 042737 000001 
004626 005237 000304 
2737 
1011 
2 
2 


MACRO M1113 


177766 
000302 


177766 
000304 


000020 


000302 


KK 11-NOV-81 10:05 PAGE 38 
EST #21 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SEQUENCE 


-SBTTL TEST #21 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


sRAEAAEAAAAAAAAAEAAREEEREREEEAAEAAAAAEARAARAAEAAAAERAAERARTEAEAAEA AE REAEREES 


>TEST 21 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


PPPOTTTTTTTITTTITT LILI TT LLL LLL LLL LLL LLL 


TST21: 


100$: 


18: 


f CPUERR 
#177,$FATAL 
(R2) 


4 oe 


hel STESTN 
st2e-12 


rau 

#18 RTRAP2 
_—_ 
#100, $FATAL 
(R2) 


L 
“MOVE SPECIAL POWER MONI 


; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 

TOR FATAL # TO SFATAL 

> SET MSGTYP TO FATAL ERROR 
POWER BIT FOUND SET 

CLEAR THE BIT FOUND SET 

sUPDATE TEST NUMBER 

; SEQUENCE fo 








TO ERROR HALT ON SEQ ERROR 
7 STACK POINTER SETUP 

;RETURN POINTER 

;RESERVED INSTRUCTION 

;TEST DECREMENT OF SP 


;MOVE TO MAILBOX # 
:SET MSGTYP TO FATAL E 


aeannae (00 t28e088 


RROR 
:NOT Be maps TWO yore OR WRONG STSTNM 


WITH 240 
WITH 761 


45 


_—_- SO  —-  ee - —_— --- 


G 11 





CKK 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 39 SEQUENCE 
TEST #22 - TEST THAT PROPER P.C. IS SAVED 
706 -SBTTL TEST #22 - TEST THAT PROPER P.C. iS SAVED 


SEERA AEAAEARERERER ERE EEEEEEAA RARE RAR ARERERAERARRARRERERARRAEREEERER EERE 


:TEST 22 - TEST THAT PROPER P.C. IS SAVED 


POPP T PTT TTT TTT TITTLE 





004676 032737 000001 177766 $122: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
004704 001410 BEQ 106$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
004706 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
004714 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004716 HALT *CPU POWER BIT FOUND SET 
004720 042737 000001 177766 BIC #1, CPUERR ; CLEAR THE BIT FOUND SET 
004726 00 <3? 000304 100$: INC STESTN “UPDATE TEST NUMBER 
004732 022737 000022 000304 CMP #22 STESTN = SEQUENCE ERROR? 
00474 1012 BNE S23 3-1 :BRANCH TO ERROR HALT ON SEQ ERROR 
707 004742 012706 000500 MOV paur , ss : STACK POINTER st TUP 
708 004746 012737 004756 000020 MOV #1$,RTRAP2 “RETURN FROM TRAP POINTER 
709 004754 000004 10T = TRAP ON THIS INSTRUCTION 
710 006756 022737 004756 000474 1S: CMP #1$ BUFF -4 “CHECK FOR INCREMENTED P.C. 
711 004764 001405 BEQ TST 
Oe 786 012737 000101 000302 MOV #101, $F ATAL sMOVE TO MAILBOX # ‘txeeaee 101 eanenne 
004774 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
004776 000000 HALT : INCORRECT P.C..OR WRONG STs 
TO SCOPE REPLACE HALT N80 


;AND REPLACE NEXT INST WITH 760 


faeces, a ET EO LLL LLL LLL LLL LL ear eens 


ee ee ce — = — _— — Se 
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MACRO M1113 
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11-NOV-81 10:05 PAGE 40 SEQUENCE 47 


#23 = TEST THAT “‘OLD’’ CC AND PRI ARE PLACED ON STACK 


712 


MAMAN 
— 
oO 


SS998S88388338 
o ofn 


SSsssssss 
xs 


Wav 
_—_— > 


MAMMA Anu 
nd aed ed eed aed nd eed ed ed ed 
EN 


Wine & 
fr e% 


000001 
000177 
000001 
000304 
000023 


000500 


177796 


.SBTTL TEST #23 - TEST THAT “‘OLD'’ CC AND PRI ARE PLACED ON STACK 


SAREE AAEAAEAAEARAAAAAEAEEAEEEERERAARARAAAARAERERERAAERARAHAAAAHAAAAAREAAAAATAAAEE 


“TEST 23 - TEST THAT ‘‘OLD'’ CC AND PRI ARE PLACED ON STACK 


SARA AAAEEAAAAAEAAEAEEEAEEAEAAAAEARAEAAEAAAARERAERAREAAAERAEAAAEHAREHEAEAEAE 


$123: BIT “" CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ Ata “BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV " ’, SFATAL *MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 


INC “SET MSGTYP TO FATAL ERROR 
HALT *CPU POWER BIT FOUND SET 
BIC #1, CPUERR ; CLEAR THE BIT FOUND SET 
100$: INC STESTN TE TEST NUMBER 
CMP #23.$TESTN : SEQUENCE ERROR? 
BNE TST24-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
MOV #BUFF.SP :SET UP 
MOV #1$,RTRAP2 *SET UP 
CLR CC “CLEAR CC AND PRICRITY 
10T : TRAP 
1$: cmp BUFF-2,#0 “TEST THAT OLD STATUS WENT TO STACK 
MOV #102, $FATAL :MOVE TO MAILBOX # teeeene 102 eeeeeee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT ‘INCORRECT STATUS 


=TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 755 
2$: MOV #BUFF SP *SET UP 
MOV #3$ RTRAP2 “SET UP 
MOV #357,CC “SET PRIORITY 
SCC “SET CC 


IOT ; 
3$: A weet eaer s; COMPARES STATUS ON STACK 
MOV #103,SFATAL :MOVE TO MAILBOX # seeaeee 105 teeenee 
INC (R2) :SET MSGTYP TO FATAL ERROR 
HAL T ; INCORRECT STATUS ON STACK,OR WRONG STSTNM 
“TO SCOPE REPLACE HALT WITH 240 


:AND REPLACE NEXT INST WITH 732 


— ee —_— <— — = = 


727 


cllunns 
WIS So 


ssssssssssesesess 


bee et tg? 44) te et 


# 
sssss 


Ssosos 


$ 
sssss 


ay 
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~~ 
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MACRO M111 


1 
#24 - ‘Test THAT ‘NEW’ STATUS 


MUS & & & whyngnn 
SeSooRONOONS 


MViIiwn 


WAiwMuwwn 
— —s 
eng Nong 


row 


See 


SSS 


A 


177766 
000302 


177766 


000304 


000020 


000302 


000302 


000302 


000302 


177776 
000302 


000020 
000022 


11-NOV 
S CORRECT 


a 10:05 PAGE 41 


SEQUENCE 


-SBTTL TEST #24 - TEST THAT ‘NEW’ STATUS IS CORRECT 


s RAAAEAAAAAAAAARERAAAAEAEREAEERERAAAAAHRERAAAERARARARREREEAHERETERATAAET EES 


:TEST 24 - TEST THAT ‘NEW’ STATUS IS CORRECT 


PPPPTPTSTITTITITITI TILL TLL LLL LL LLL LLL iii iii iii 


1ST26: 


1000$: 


18: 


2$: 


3$: 


4$: 


5$: 


6$: 


#1, CPUERR 
100$ 

#177, SFATAL 
(R2) 


#1, CPUERR 


STESIN 
#24.$TESTN 
1000$ 

12$ 


#BUF 
#1$, RTRAP2 


RTRAP2+2 


2$ 

#104, SFATAL 
(R2) 

3$ 

#105, $FATAL 
(R2) 

4$ 
#106,SFATAL 
(R2) 


5$ 
#107, $FATAL 
(R2) 


#340,CC 
#110, SFATAL 
(R2) 


#BUF F 
#7$,R 


AP2 
acs, RIRAP2+2 


sSEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
[BRANCH AROUND CLEAR AND HALT IF CLEAR 
MONITOR FATAL # TO SFATAL 


HALT ON SEQ ERROR JUMP IF OK 
ON SEQ ERROR 


;CLEAR FUTURE PRIORITY AND CC 
TEST FOR ‘'C’’ CLEARED 


:MOVE TO MAILBOX # *eeeeee 104 seeeeee 
“SET MSGTYP TO FATAL ERROR 

:N NOT CLEARED 

[TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 761 


sMOVE TO MAILBOX # *aeae08 105 seeneee 
:SET MSGTYP TO FATAL ERROR 

:Z NOT CLEARED 

:TO SCOPE REPLACE HALT WITH 240 

: AND REPLACE NEXT INST WITH 753 


:MOVE TO MAILBOX # seeeeee 106 eeeeeee 
; SET ae Sp FATAL ERROR 


V NOT C 
‘Yo SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 745 


:MOVE TO MAILBOX # eeeeaee 107 teneane 
SET ae ee FATAL ERROR 


:C NOT C 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE _ INST WITH 737 
; TEST PRIORITY 


sMOVE TO MAILBOX # *xeeaa08 110 seeeeee 
:SET MSGTYP TO FATAL ERROR 
;PRIORITY NOT ieee 
>TO SCOPE REPLACE HALT WITH 630 
: AND REPLACE text INST WITH 726 


SET NEW ‘'CC’’ AND PRIORITY 





mm eee ee eee eee er ee eee 


005370 
005372 
005372 


744 005406 
00 


745 00542 


747 005452 
748 005456 
749 005462 
750 


Qe +--+ -- ee 


= KABDO 11/44 TRAPS 
TEST #24 = TEST THAT “WEW'’ STATUS IS CORRECT 


— 
qT 
Ww 


RRO ae 


orn wi 


MACRO M1113 


000111 


000112 


000113 


000114 


177776 
000017 
000340 
000115 


000022 
000022 


000302 


000302 


000302 


000302 


000302 


000020 


nie 


7$: 


9$: 


10$: 


11$: 


12$: 


13$: 


IOT 


a 10:05 PAGE 41-1 


8$ 
#111,SFATAL 
(R2) 

9$ 

#112, $FATAL 
(R2) 

10$ 

#113, SFATAL 
(R2) 


11$ 
#114, $FATAL 
(R2) 


#115, SFATAL 
(R2) 


#22,20 
22 


J 11 


; TRAP HERE 

sMOVE TO MAILBOX # «eeeee8 117 
: SET ae Aa TO FATAL ERROR 

:TO SCOPE REPLACE HALT WITH $60 
* AND REPLACE NEXT INST WITH 707 
sMOVE TO MAILBOX # **eeee8 1172 
4 a a hag TO FATAL ERROR 

:TO SCOPE REPLACE HALT WITH 240 
= AND REPLACE NEXT INST WITH 701 
:MOVE TO MAILBOX # ‘t*#eaeee 1173 
:SET MSGTYP TO FATAL ERROR 

:V NOT SET 

*TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 673 
sMOVE TO MAILBOX # xeeeene 114 
:SET MSGTYP TO FATAL ERROR 


:C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 665 


:MOVE TO MAILBOX # seeeee8 115 
sSET oy Mya TO FATAL E 
:PR ORIT HANGE 


+2 
SHALT 


SEQUENCE 


eenaeene 


eenaneese 


ea2eenne 


aanaaneee 


aeneaagae 


WRONG STSTNM 


49 


_ ee ee 


CKK 
| eat 
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753 
005514 
005522 
005524 
005532 
EEE I 
0055 
005544 
005550 
005556 
754 005560 
755 092286 
75 iF 2 
75 5574 
005602 
005 
758 005606 


2g 
WN Ph 
rN es 
td tL 
NmuNO™N 


MACRO M1113 
#25 - TEST THAT A TRAP OCCURS ON AN EMT 


000500 
005606 
000116 


177766 
000302 


177766 
000304 


000030 
000302 


—— ee ae 


—— Ls 0S PAGE 42 


K 11 
SEQUENCE 50 


.SBTTL TEST #25 - TEST THAT A TRAP OCCURS ON AN EMT INS 


{RRA AAAAAAEAAARERARAAATAAAAAAAAAAAAAEAEERARAHERAEAAERERAAAEAAE RATER AE TEES 


:TEST 25 - TEST THAT A TRAP OCCURS ON AN EMT INS 


RERAAAEEAEAAAAAARARARAEEEAAAERERARAERAAARARARAAAKRAHRAREKRAHRAAKRAAAAAAARARAEAAES 


TST25: BIT “ CPUERR 
BE 


:SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
Q nt “BRANCH AROUND CLEAR AND HALT IF CLE 
MOV “| ¢ SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC “SET MSGTYP TO FATAL ERROR 
HALT :CPU POWER BIT FOUND SET 
BIC a CPUERR “CLEAR THE BIT FOUND SET 
100$: INC STESIN “UPDATE TEST 
CMP #25.$TESIN ; SEQUENCE ERROR? 
BNE IST26~12 CH TO ERROR HALT ON SEQ ERROR 
MOV #BUFF, 3 : STACK POINTER SETUP 
MOV #1$,RTRAP3 “RETURN LOCATION 
EMT “RESERVE INSTRUCT 1OM. SHOULD TRAP 
MOV #116, $FATAL “MOVE TO MAILBOX # *eeneee 116 eaeeeee 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT ‘EMT DIDN'T TRAP,OR WRONG $STSTNM 


:TO SCOPE REPLACE HALT WITH 240 
- ZAND REPLACE NEXT INST WITH 764 


——————— 


A A LLL I CE Lm = 


CKK 


TEST 


SNS 
PO. o 


™~ 
aoo 
win 


SS 
3 


759 


11/64 TRAPS 
- TEST DEC OF 


: 
SSsooeseeseesssS 
Sites 
Anaror os 


RSS 


MACRO M1113 


000001 
000177 


00304 


000026 


000500 
005666 


000474 
000117 


177766 
000302 


177766 
000304 


000030 


000302 


11-NOV-81 10:05 PAGE 43 
STACK POINTER ON A TRAP OPER 


SEQUENCE 


-SBTTL TEST #26 - TEST DEC OF STACK POINTER ON A TRAP OPER 


peaadeaareaaaereeaeeeeeteneereanranaaaraaanaaagragaganeeaangaeaaaaaaragseaes 


:TEST 26 - TEST DEC OF STACK POINTER ON A TRAP OPER 


PPP TTOTTITITTTITITITITITTI TLL LLL LL LLL LLL LLL 


"$126: BIT #1, CPUERR 
BEQ 100$ 
MOV #177, SF ATAL 
INC (R2) 
HALT 
BIC #1, CPUERR 
100$: INC STESIN 
CMP #26 STESTA 
BNE S27 7-1 
MOV waur 
MOV Tis RIRAP3 
EMT 
1$: CMP SP, ABUF F =4 
BEQ T 
MOV #117, SFATAL 
INC (R2) 
HALT 


; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
C TOR FATAL # TO SFATAL 


= SEQUENCE ERROR? 
“BRANCH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 
RETURN POINTER 
RESERVED INSTRUCTION 
>TEST DECREMENT OF SP 


Ae te TO MAILBOX # ‘seeee02 117 
WO WORDS.OR WRONG STSTNM 
‘TO SCOPE REPLACE HALT WITH 240 
+ AND REPLACE NEXT INST WITH 761 


aenenaee 


#9 


CKK 11/46 TRAPS 
TE fSte #27 - TEST THAT PROPER P.C. IS SAVED 


765 


NYS 
s OROre 


SSSNSFk 


mn 


s83888838 


ws 
on 


- << ect  e ea L , —L I 


o- 
we 
ws 


$23 
WIN = 
MNS 
—NO 
NM 


MACRO M1113 


177766 
000302 


177766 
000304 


000030 
000474 
000302 


-SBTTL TEST #27 = TEST THAT PROPER P.C. 


M11 


11-NOV-81 10:05 PAGE 44 


SEQUENCE 


iS SAVED 


FRAAAAAAEAAED CAAHAAAAHAAAAAAAAARAAERAAH ST RREKAAHARRAARAR AK AHA RARER Ae AEA ASS 


:TEST 27 = TEST THAT PROPER P.C. 


IS SAVED 


WPPTTTTTTITITITITICI LILI LILI LLL LILI LiL 


TST27: 


100$: 


1§: 


i f CPUERR 
MOV #177, SFATAL 
(R2) 


HAL 

BIC #1, , CPUERR 
#27 STESTN 
BNE TST 30-1 

MOV #BUF F "3 
MOV #1$,RTRAP3 
CMP #1$ BUFF =< 


TST 
MOV #120, SFATAL 
(R2) 


7 SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH CLEAR AND HALT IF CLE 
Ab FATAL # TO SFATAL 


TEST 
 EOUENCE ERROR? 
“BRANCH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 
RTURN F ROM TRAP POINTER 
TRAP ON THIS INSTRICTION 
“CHECK FOR INCREMENTED P.C. 


:MOVE TO MAILBOX # ‘*eeeee2 120 
:SET MSGTYP TO FATAL ERROR 
* INCORRECT P.C..OR WRONG $TS 
:TO SCOPE REPLACE HALT WITH +30 
* AND REPLACE NEXT INST WITH 760 


aeaneaanee 


52 


nn 


a 


CKK 11/44 TRAPS 


771 


77 
778 006104 | 


NOoroo-S 
WIN 
NOrne~ 
WAWOS Ws 
OonNNNONMNON 


Miron rove 
oF 


o-— oo 
Ness sss 
WONSUAAS 
WOoOnrNouuww 
NMNUVUNONN™N 


NWWOS 
NNNO 


oun —w 
onnen 
Oo—-WOor 
on wNyvI~s 


MACRO M1113 


000500 
006076 
177776 
000476 
000121 


000500 
006144 
000357 
000476 


000122 


177766 
000302 


177766 
000304 


000030 


000000 
000302 


N 11 
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TEST #30 = TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


SEQUENCE 


-SBTTL TEST #30 - TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


SERRA AAAEAAAAAAAARAAATAAAAARAKAAAAAAAAAAAAAAKAKAAAARKAAeKERA KARA A EKA e REESE 


;TEST 30 - TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


REE AAAAAEEARAAAEAEEEEAAAEEAAERAAEAAAARAEAARAEARAARAEARAAREKRAKARAAAAARAAEEEAEE 


TST30: 


100$: 


1$: 


2$: 


3$: 


BIT 


#1, CPUERR 
100$ 

#177, SFATAL 
(R2) 


#1, oo 


STE 
He 


#BUFF ,SP 
#1$ .RTRAP3 
cc 


BUFF =-2 #0 
#121,$FATAL 
(R2) 


#BUFF SP 
#3$_ RTRAPS 
#357,CC 


4 eatned 
#122, $FATAL 
(R2) 


mee ae ee ee 


: SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
MONITOR FATAL # TO SFATAL 


; UP T 

; SEQUENCE ERROR? 
;BRANCH 

:SET UP 


;SET UP 
:CLEAR CC AND PRICRITY 


H TO ERROR HALT ON SEQ ERROR 


3; TRAP 
: TEST THAT OLD STATUS WENT TO STACK 


;MOVE TO MAILBOX # teeeeee 121 
:SET MSGTYP TO FATAL ERROR 
: INCORRECT STATUS 
O SCOPE REPLACE HALT WITH 240 
AND * ee NEXT INST WITH 755 


geaenee 


SEF uP 

“SET PRIORITY 

:SET CC 

“COMPARES STATUS ON STACK 


sMOVE TO MAILBOX kauteete 122 
:SET MSGTYP TO FATAL ERROR 

: INCORRECT STATUS ON eh OR WRONG $STSTNM 
:TO SCOPE REPLACE HALT WITH 240 

“AND REPLACE NEXT INST WITH 732 


eeaenne 


53 


a — — 


ee ae -—Oi 
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TEST #31 = TEST THAT ‘NEW’ STATUS IS CORRECT 





786 _SBTTL TEST #31 - TEST THAT "NEW STATUS IS CORRECT 
{EAA AAAAEAA AERA AEE AAA AEEA AEA AAEAAERARAARERAKERAAAAEARAAE RARER ERA E RE AH ARES 
“TEST 31 - TEST THAT "NEW'’ STATUS IS CORRECT 
eee a REESE REEEEREEEREREREERERERREREREREREREREEEE AREER AREER EE ) 
006166 032737 000001 177766 TST31: BIT #1, CPUERR sSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET : 
006174 0093 BEQ 100$ “BRANCH H AROUND CLEAR AND HALT IF CLEAR | 
006176 1273 000177 000302 MOV #177, $F ATAL *MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
21 INC (R2) ;SET MSGTYP TO FATAL ERROR 
006 HALT *C POWER BIT FOUND SET 
00621 042737 sia sit 177766 BI #1,CPUERR * CLEAR THE BIT FOUND SET 
006216 00 ; 7 000304 100$: INC STESTN “UPDATE TEST NUMBER 
022737 000031 000304 CMP #31,$TESIN ; SEQUENCE ERROR? 
006 Les BEQ 1 $ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
000137 006474 10008 JMP TST32-12 : JUMP TO ERROR HALT ON SEQ ERROR 
787 36 012706 000500 MOV #BUFF ,SP 
788 42 012737 006256 000030 MOV #1$,RTRAP3 
78 5 005037 000032 CLR RTRAP3+2 sCLEAR FUTURE PRIORITY AND CC 
790 006254 104000 EMT ee 
791 006256 1$: sTEST FOR ‘'C’’ CLEARED 
792 006256 100005 BPL 2$ 
006260 012737 000123 000302 MOV #123, $FATAL :MOVE TO MAILBOX # teeeeee 123 eneenee 
$8 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
006270 000000 HALT :C NOT CLEARED 
*T0 SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 761 
793 006272 2$: 
006272 001005 BNE 3$ 
006274 012737 000124 000302 MOY #124, SFATAL :MOVE TO MAILBOX # seennee 124 seateee 
006302 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
006304 000000 HALT :Z2 NOT CLEARED 
=TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 753 
794 006306 3$: 
006306 102005 BVC 4$ 
006310 012737 000125 000302 MOV #125, $FATAL :MOVE TO MAILBOX # tteeeee 125 eenenes 
aig de 005212 INC (R2) gy MSGTYP TO FATAL ERROR 
006320 000000 HALT V NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
= AND REPLACE NEXT INST WITH 745 
795 006322 4$: 
006 103005 BCC 5$ 
006324 012737 000126 000302 MCV #126,$F ATAL sMOVE TO MAILBOX # teexeee 126 teenene 
006 $212 INC (R2) “SET MSGTYP TO FATAL ERROR 
0062.34 000 HALT =C NOT CLEARED 
*TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE ead INST WITH 737 
796 %6 052757 000340 177776 5$: BIT #340,CC “TEST PRIORITY 
79 4 001405 BEQ 
12737 000127 000302 MOV #127, $FATAL :MOVE TO MAILBOX # *eeenee 127 seeenee 
54 212 INC (R2) SET MSGTYP TO FATAL ERROR 
56 HALT “PRIORITY NOT ZERO 
>TO SCOPE REPLACE 4ALT WITH 240 
“AND REPLACE NEXT INST WITH 726 
798 006 012706 0005 6S: MOV #BUF F 
799 006 ot 737 006402 000030 MOV AS_RTRAP3 . 
800 006372 012737 000357 000032 MOV #357,RTRAP3+2 :SET NEW “‘CC’’ AND PRIORITY 





eee eee err ee 


| CKK 11/44 TRAPS MACRO M1113 eoeyeet 10:05 
TEST #31 - TEST THAT ‘NEW’ STATUS IS CORRECT 


801 104000 EMT 
802 O0640e 7$: 
006402 1 93 BM] 
sake: 012737 000130 000302 MOV 
12 005212 INC 
006414 000000 HALT 
803 0064 8$: 





4503 
gnae 000131 000302 MOV 


32 9$: 
000132 000302 MOV 


805 006446 10$: 
3405 

2737 000133 000302 

S212 


11$: ccc 


ER 
: 


7 

: 000340 177776 CMP 
5 000134 000302 MOV 
0 


Sos 


eerie 


Per ae 


ec eee | aC 


PAGE 46-1 


8$ 

#130, $FATAL 
(R2) 

9$ 
#131,SFATAL 
(R2) 

10$ 

#132, $FATAL 
(R2) 

11$ 

#133, SFATAL 
(R2) 


#340,CC 
TST3 

#134, SFATAL 
(R2) 


C 12 


; TRAP HERE 


sMOVE TO MAILBOX # «eeeeee 130 


| 2 SET at hg TO FATAL ERROR 


N NO 
‘To SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 707 


:MOVE TO MAILBOX # wxeeeeee 13] 
: SET “gh TO FATAL ERROR 

TO SCOPE REPLACE HALT WITH 240 

“AND REPLACE NEXT INST WITH 701 

:MOVE TO MAILBOX # ‘*eee022 132 
: SET ag hg TO FATAL ERROR 


V_NO 
‘To SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 673 


:MOVE TO MAILBOX # **eeeee =133 


;SET MSGTYP TO FATA: ERROR 


:C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 665 


sMOVE TO MAILBOX # xeexexe 134 
SET “| Met TO FATAL ERROR 


eeneeee 


eaeneee 


eeneeere 


Reecene 


zgeeanene 


:PRIORITY WAS CHANGED,OR WRONG STSTNM 


:TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 655 


SEQUENCE 


55 
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TEST #32 - TEST THAT ALL COMB EMT WILL CAUS 


809 





-SBTTL TEST #32 - TEST THAT ALL COMB EMT WILL CAUSE A TRAP 


sRAAAAAAAAEAARAEAAAAEAAEAEAE AEE AAEAAEARAAAAAARARAEERARA RA AAERA ATA REA AAA ETS 


:TEST 32 - TEST THAT ALL COMB EMT WILL CAUSE A TRAP 


PPO TTTTITITITITII TTL LLL LLL LLL LL LLL LL LLL 


006506 000001 177766 1ST32: BIT # CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
006514 BEQ nt : H AROUND CLEAR AND HALT IF CLE 
006516 000177 000302 MOV a ., SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
9069 4 INC *SET MSGTYP TO FATAL ERROR 
‘ HALT =CPU POWER BIT FOUND SET 
0065 1 177766 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
5 000 100$: INC STESTN ‘UPDATE TEST NUMBER 
34 000032 000304 CMP #32,$TESIN ; SEQUENCE ERROR? 
BNE 3$ H TO ERROR HALT ON SEQ ERROR 
810 352 104000 006572 MOV HEMT, 2$ EINITIALIZE BASE EMT INSTRUCTION 
11 006606 000030 MOV #4$, 30 *RETURN FROM TRAP TO 3$ 
B12 366 000500 1$: MOV #BUFF SP “SET UP STACK POINTER 
815 a7e 2: EMT “TRAP INST. WILL BE MODIFIED TO EMT+377 
574 000135 000302 MOV #135, SF ATAL sMOVE TO MAILBOX # sxeeenee 135 eeeenee 
006602 INC (R2) ;SET MSGTYP TO FATAL ERROR 
006604 HALT PREVIOUS INST FAILED TO TRAP.OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 
815 006572 4$: INC 2$ : INCREMENT TRAP INSTRUCTION 
816 00661 104377 006572 CMP #EMT+377,2$ =EMT+377 TO EMT? 
817 006620 BHIS  1§$ :HAVE WE TESTED ALL 
315 006622 000032 000030 MOV #32, 30 7/.+ 
820 006630 000032 CLR 32 “HALT 


eS 


CKK 11/44 TRAPS 
TEST #33 = TEST THAT AT 


821 


826 006726 


°o 

_ 
tnke~n 

Ww 
NyNOoON 


nog Be 
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eae —_——— 


E 12 
SEQUENCE 57 


AP OCCURES ON AN “‘TRACE-TRT"’ INS 


177766 
000302 


177766 
000304 


000014 
000302 


.SBTTL TEST #33 - TEST THAT A TRAP OCCURES ON AN ‘‘TRACE-TRT"’ INS 


RARER AEEAAAEARARARAAEEREREAREREAAARARAAA  AARAAAEAAREARAAARAEAEHAAEAEETAAAEAEAES 


“TEST 33 - TESi THAT A TRAP OCCUPES ON AN ‘'TRACE-TRT'’ INS 


serst. AIT. #1 CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) 






S133: BIT CPUERR SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ it CH AROUND CLEAR AND HALT IF CLEAR 
MOV a .. SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC :SET MSGTYP T 
HALT POWER BI! 
BIC a" CPUERR “CLEAR THE B 
100$: INC STESTN “UPDATE TEST NUMBE 
CMP a3 $TESTN =SEQUENCE ERROR? 
BNE STS4~12 “BRANCH TO ERROR HALT ON SEQ ERROR 
MOV WBUFF "3 s STACK POINTER SETUP 
MOV #1$,RTRAP4 *RETURN LOCATION 
TRT “RESERVED INSTRUCTION, SHOULD T 
MOV #136, S$FATAL “MOVE TO MAILBOX # teeenee 136 senenee 
INC (R2) “SET MSGTYP TO FATAL E 
HALT *TRT DIDN' wR TS 
‘TO SCOPE REPLACE HALT WITH 240 
n “AND REPLACE NEXT INST WITH 764 


ee 


— 


a eee — -—- —_-_ 


F 12 
11/44 TRAPS MACRO 1113 11-NOV-81 10: =. PAGE 49 SEQUENCE 58 
Test - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


-SBTTL TEST #34 ~- TEST DEC OF STACK POINTER ON A TRAP OPERATI 


SERS EAEEKAAAAAAAAAREAREAAEAAATARARARARAAARAAAEREAAARAARAAAARAAAAREAAAAAAAAAAES 


a 
i 
| 
i 
oi “TEST 34 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


——_— —w «ee 


SEERA AAAEAAAEAAAETEEAETEAERERAAARAARAAAARARAERAAAEAAAAAAAREEARARAAAAAAAAEE 





006726 032737 000001 177766 TST34: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MON TOR BIT) IS SET 
0067 001410 BEQ 1 “BRANCH AROUND CLEAR AND HALT IF CLEAR 
0067 01275 000177 000302 MOV #177, $FATAL “MOVE SPECIAL ITOR FATAL # TO SFATAL 
006744 212 INC (R2) *SET MSGTYP TO FATAL 
pees HALT s€¢ g 
00675 042 900001 177766 BIC #1, CPUERR *CLEAR THE BIT FOUND SET 
0067 é 7 000 100$: INC STESTN “UPDATE TEST NUMBER 
7 2737 000034 000304 CMP #34 STESTN : SEQUENC 
7 1071 BNE $735-12 “BRANCH TO ERROR HALT ON SEQ ERROR 
8 006772 O12 06 000500 MOV peur "$5 sSTACK POINTER SETUP 
006776 12737 007006 000014 MOV #1$,.RTRAPG “RETURN POINTER 
8 004 TRT “RESERVED INSTRUCTION 
831 7006 0627 000474 1$: CMP SP, MBUF F -4 -TEST DECREMENT OF SP 
832 00701 1405 BEQ TST35 
007014 012737 000137 000302 MOV #137,SFATAL sMOVE TO MAILBOX # seennene 137 sennnne 
007022 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007024 000000 HALT :NOT DECREMENTED TWO WORDS.OR WRONG STSTNM 


0 SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 


a 


ee Ee ee 





emma ee _-_— 
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aes 10:05 PAGE 50 
TEST #35 - TEST THAT PROPER P.C. IS SAVED 





833 .SBTTL TEST #35 - TEST THAT PROPER P.C. IS SAVED 
{RARER AAEAARAERAERAAEEEEEEAEEAAAAEEAARAAAAAARAAREEARAAEAAEEEERRAEEAAEEEES 
“TEST 35 - TEST THAT PROPER P.C. IS SAVED 
PPO TPOCTTTTTTTITITITTTITILITITITI LIL LILLILLLiLiLiLiL LiL 
007026 032737 000001 177766 S135: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
007034 001410 BEQ CH AROUND CLEAR AND HALT IF CLE 
0070 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
007044 212 INC (R2) *SET MSGTYP TO FATAL ERR 
007 HALT : CPU R BIT FOUND SET 
007050 0427 000001 177766 BIC #1, CPUERR :CLEAR T T FOUND SET 
007056 00 é 7 000304 100$: INC STN :UPDATE TEST NUMBE 
007 022 7 000035 000304 CMP m5, STESTN =SEQUENCE ERROR? 
0070 1012 BNE $7 36-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
834 007072 012706 000500 MOV pBUFF "3 : STACK POINTER SETUP 
835 007076 012737 007106 000014 MOV #1$,RTRAPG “RETURN FROM TRAP POINTER 
836 0071 3 TRT *TRAP ON THIS INSTRUCTION 
837 007106 022737 007106 000474 1S: CMP FF=4 “CHECK FOR INCREMENTED P.C. 
838 007114 1405 BEQ Tg 
007116 pies 7 000140 000302 MOV #140, $F ATAL sMOVE TO MAILBOX # seeenne 140 teaenee 
007124 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
007126 000000 HALT s INCORRECT P.C.,OR WRONG $TSTNM 





TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 


ee er em — -— = 


——— - —- _— == _—_—_ EE —_->  —_——- me eee ———— 


H 12 


oe 11/446 TRAPS MACRO 1113 11-NOV-81 10:05 PAGE 51 SEQUENCE 
c: - TEST THAT “OLD’’ CC AND PRI ARE PLACED ON STACK 
| 839 .SBTTL TEST #36 - TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 
s RARER AAEAAARAAAAAAEEAAEAEEEEAERAAAAAAAAAREAEAARERAERAAHERAAAEEAAEA RAAT ERAS 
= TEST 36 - TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 
| PPP STP OOT TTT TT TTTITITITI TTI LLL LLL LLL LLL LLL 
| 007130 032737 000001 177766 TST36: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
| 007136 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
007140 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
007146 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007150 000000 HALT :CPU POWER BIT FOUND SET 
007152 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SE 
007160 005237 000304 100$: INC T ESTN ;UPDATE TEST NUMBER 
007164 022737 000036 000304 CMP #36 STESTN = SEQUENCE ERROR? 
007172 001040 BNE STS?-12 =BRANCH TO ERROR HALT ON SEQ ERROR 
840 007174 012706 000500 MOV WaUF sp :SET UP 
841 007200 01275 007216 000014 MOV #1$,.RTRAPG *SET UP 
are th 005037 177776 CLR CC :CLEAR CC AND PRICRITY 
843 007212 000257 CCC 
844 007214 000003 TRT : TRAP 
B45 007216 023727 000476 000000 1S: CMP BUFF-2,#0 *TEST THAT OLD STATUS WENT TO STACK 
B46 -TEST FOR ALL ZEROS 
847 007224 001405 BEQ 2$ 
007226 012737 000141 000302 MOV #141, $FATAL :MOVE TO MAILBOX # ‘teennee 141 sennene 
007234 005212 INC (R2) =SET MSGTYP 10 FATAL ERROR 
007236 000000 HALT : INCORRECT STATUS 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
848 007240 012706 000500 2$: MOV #BUFF SP *SET UP 
849 007244 012737 007264 000014 MOV #3$_ RTRAPG “SET UP 
850 007252 012737 000357 177776 MOV #357,CC “SET PRIORITY 
851 007260 000277 SCC =SET=SET CC 
892 007262 3 TRT : 
B53 007264 023727 000476 000357 3S: CMP BUFF -2,4357 “COMPARES STATUS ON STACK 
854 007272 001405 BEQ TST 
007274 012737 000142 000302 MOV #142, SF ATAL :MOVE TO MAILBOX # *eexxee 142 seeneee 
007302 005212 INC (R2) =SET MSGTYP TO FATAL ERROR 
007304 000000 HALT > INCORRECT STATUS ON STACK,OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 


;AND REPLACE NEXT INST WITH 732 


11/44 TRAPS 


T #37 = TEST THAT 
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MACRO M1113 
"NEW" STATUS IS CORRECT 


76 
000016 


000143 
000144 
000145 
000146 


000340 
000147 


00035? 


177766 
000302 


177766 


000304 


000014 


000302 


000302 


000302 


000302 


177776 
000302 


000014 
000016 
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SEQUENCE 61 


-SBTTL TEST #37 = TEST THAT ‘NEW’ STATUS IS CORRECT 


fs RAAAAAAAAAAAAEAAEAEAAAAAETAAAAAAEAAAAARARAAEAAAAERARARAR AAR eAA RAK AAA HAA AATS 


TEST 37 - TEST THAT ‘NEW’ STATUS IS CORRECT 


“SE REEEAAAAAEEAAAEAREEAAEATAAEAAAAARAEEARAAAARAAAAERAREKAKRAAAARARAREAAAAH AAAS 


TST37: 


100$: 


1000$: 


4$: 


5$: 


6$: 


9$: 





;SEE IF BIT 0 OF CPUERR (POWER oer ie BIT) IS SET 
;BRANCH AROUND CLEAR AND HALT IF CLEAR 
OR FATAL # TO SFATAL 


#1, CPUERR 
100$ 

#177, $FATAL 
(R2) 

#1, CPUERR CL 
STESTN 
#37,$TESIN : NC OR? 
1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
15$ : JUMP TO ERROR HALT ON SEQ ERROR 

#BUFF SP 
#4$,.RTRAPG 
RTRAP4 +2 =CLEAR FUTURE PRIORITY AND CC 
:TEST FOR "'C’’ CLEARED 


sMOVE TO MAILBOX # eeeenee 163 
SET ~yohe TO FATAL ERROR 
:C NOT CLEARED 


:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 761 


eeaeanane 


5$ 
#143, SFATAL 
(R2) 


zaeateee 


6$ 
#144,SFATAL sMOVE TO MAILBOX # seeeaee 144 
(R2) :SET MSGTYP TO FATAL ERROR 
32 NOT CLEARED 
*T0 SCOPE REPLACE HALT WITH 240 
> AND REPLACE NEXT INST WITH 753 


a2agaenese 


sMOVE TO MAILBOX # «eeenee 145 
SET MSGTYP TO FATAL ERROR 
iV NOT CLEARED 

TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 745 


7$ 
#145 ,SFATAL 
(R2) 


eeanaaeee 


sMOVE TO MAILBOX eeeneee 146 
:SET MSGTYP TO FATAL ERROR 

;C NOT CLEARED 

:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 737 
:TEST PRIORITY 


sMOVE TO MAILBOX # seeeeee 1467 
“SET MSGTYP TO FATAL ERROR 
PRIORITY Y NOT ZERO 

TO SCOPE REPLACE HALT WITH 240 
+ AND REPLACE NEXT INST WITH 726 


8$ 
#146, $F ATAL 
(R2) 


g308.€C 
#147, $FATAL 
(R2) 


ageaeanee 


A#BUF F 
#10$ .RTRAPG 
#357, *RIRAPL#2 SET NEW ‘'CC’’ AND PRIORITY 


LT 


CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 52-1 SEQUENCE 


TEST #37 = TEST THAT ‘NEW’ STATUS IS CORRECT 
870 007520 000003 TRT ; TRAP HERE 
871 007522 10$: 
007522 100405 BM] 11$ 
007524 012737 000150 000302 MOV #150, $FATAL :MOVE TO MAILBOX # *eeenee 150 seneeee 
007532 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
007534 000000 HALT >N NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 707 
872 0075 11$: 
0075 001405 BEQ 12$ 
007540 012737 000151 000302 MOV #151. $FATAL sMOVE TO MAILBOX # teens 15] seeenee 
007546 005212 INC (R2) :SET ag hg TO FATAL ERROR 
007550 000000 HALT :Z2 NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
= AND REPLACE NEXT INST WITH 701 
873 00755 12$: 
007552 102405 BVS 13$ 
007554 012737 000152 000302 MOV #152, $FATAL :MOVE TO MAILBOX # ttexeee 152 senenee 
007562 005212 INC (R2) + SET MSGTYP TO FATAL ERROR 
007564 000000 HALT V NOT SET 
‘To SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 673 
874 007566 13$: 
007566 103405 BCS 14$ 
007570 012737 000153 000302 MOV #153, $FATAL :MOVE TO MAILBOX # *teeeee 153 teenees 
007576 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007600 000000 HALT =C NOT SET 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 665 
875 007602 013706 177776 14$: MOV cc,SP 
876 007606 042706 000017 BIC #17.SP 
877 007612 022706 000340 CMP #340, SP 
878 007616 001405 BEQ 16$ 
007620 15$: 
007620 012737 000154 000302 MOV #154, SF ATAL sMOVE TO MAILBOX # *xeeeene 154 teeenee 
007626 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
007630 000000 HALT “PRIORITY WAS CHANGED,OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 651 
879 007632 012737 000016 000014 16$: MOV #16,14 
7640 005037 000016 CLR 16 
) PDP-11 ILLEGAL AND ADDRESS INSTRUCTION TEST 
aa “ALL INSTRUCTI THAT AR 
884 : D TRAP TO LOCATION 10, AND THE 
885 “PC THAT POINTS TO THE TRAPPING INSTRUCTION 
886 *SHOULD BE PLACED ON THE STACK 


_——— —_—_sssszza as tt OT: LL LLL LLL LLL LLL LLL LLL LLL LLL LLL LLL 
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892 007724 
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893 007736 


mn ee 
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TEST #40 = TEST THAT A TRAP OCCURS ON AN ILLEGAL I 
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000500 
007736 


000155 


177766 
000302 


177766 
000304 


000010 
000302 
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SEQUENCE 


.SBTTL TEST #40 = TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


RARER AAAAERAAAAEAY TRAAKEAAAAAEAAAATAARERAREREARARARAREAAKAAKRA AAAS EEA 


“TEST 40 - TEST THAT A TRAP OCCURS ON AN ILLEGAL INS 


REE AAARERAEREEAAAEEATEAEAAAAAAAAAEAAAARERARERERAAEKEREAEAAA HARARE 


TST40: 


100$: 


1$: 


Te 


#1,CPUERR 
100$ 

#177, SFATAL 
(R2) 

#1, ‘a 
$TESTN 

#40 ss 


TST41=1 


ABUFF , sp 
#1$,.RTRAP 


R 
#155,$FATAL 
(R2) 


; SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
ANCH AR CLEAR AND HALT IF CLE 

“MOVE tt POWER MONITOR FATAL # TO SFATAL 

:SET MSGTYP TO FATAL ERROR 


TEST 

: SEQUENCE ERROR? 

ANCH TO ERROR HALT ON SEQ ERROR 
3: STACK POINTER SETUP 
“RETURN LOCATION 
: ILLEGAL oy te Ab ae SHOULD TRAP 
“MOV O MAILBOX # seeneee 155 eaeenne 
:SET MSGTYP TO FATAL ERROR 
: ILLEGAL INSTRUCTION DIDN'T TRAP,OR WRONG $STSTNM 
TO SCOPE REPLACE HALT WITH 240 
> AND REPLACE NEXT INST WITH 764 


— ee 


EEE 


L 12 
CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10: + ro: oh SEQUENCE 


TEST #41 = TEST DEC OF STACK POINTER ON A TRAP OPERA 
894 .SBTTL TEST #41 ~ TEST DEC OF STACK POINTER ON A TRAP OPERATION 


REREERAeEAEREAAREEATERAEEATHEAREAARAHRERAARAAARRAAAKRAAKRAARAKREKAAAAEAAAAAAAAA AeA 


“TEST 41 = TEST DEC OF STACK POINTER ON A TRAP OPERATION 


REARS AAAAAAEAAAAREREARAEREEAAARAAARAAARAAAARARERAEARAAAAKARARAARAAAAAHAAA AS 


773% 032737 000001 177766 S141: BIT #1, CPUERR -SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
007744 001410 BEQ “BRANCH AROUND CLEAR AND HALT IF CLE 
007746 012737 000177 000302 MOV #177, SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
007754 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
007756 900000 HALT R BIT FOUND SET 
007760 0427 000001 177766 BIC #1. CPUERR [CLEAR THE BIT FOUND SET 
007766 00 237 000304 100$: INC STESIN “UPDATE TEST NUMBER 
007772 022737 000041 000304 CMP #4 STESTN = SEQUENCE ERROR? 
010000 001011 BNE STbe 2-1 “BRANCH TC ERROR HALT ON SEQ ERROR 
895 010002 012706 000500 MOV WBUF ee :STACK POINTER SETUP 
896 010006 012737 010016 000010 MOV #1$,RTRAP “RETURN POINTER 
897 010014 000100 JMP R “RESERVED INSTRUCTION 
898 010016 020627 000474 1$: CMP SP, ABUF F ~4 “TEST DECREMENT OF SP 
899 010022 001405 BEQ TST42 
0100¢4 012737 600156 000302 MOV #156, SFATAL :MOVE TO MAILBOX # tenes 156 eeneens 
010032 005212 INC (R2) “SET MSGTYP TO FATAL E 
010034 000000 HALT :NOT DECREMENTED T S,0R WRONG $TSTNM 


WO WORDS ,OR 
SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 761 


— ee 
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TEST #42 = EST THAT PROPER P.C. IS SAVED 
900 -SBTTL TEST #42 - TEST THAT PROPER P.C. iS SAVED 


RARER AEAAARAAERAAATAETEAEAEEAEAARAAEAAAARERAARAAAEKRAAEAKERHTARAAKRAKRAAAAA AA EAE 


“TEST 42 = TEST THAT PROPER P.C. IS SAVED 


£3328 


——— me 


SEERA AERAAAARATETECAREARAERARARAAAHRAARARAKAAAAAAAARAARAHAAAARA TEA 


010036 032737 000001 177766 TST42: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010044 001410 BEC 100$ : CH AROUND CLEAR AND HALT IF CLEAR 
010046 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
010054 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 

010056 HALT Py R BIT FOUND SE 

010060 042737 000001 177766 BIC #1, CPUERR -CLEAR THE BIT FOUND SET 

01 00 237 000304 100$: INC STESTN “UPDATE TEST NUMBER 

0100 bee 37 000042 000304 CMP #42,$TESTN : SEQUENCE ERROR? 

0101 112 BNE TST43-12 =BRANCH TO ERROR HALT ON SEQ ERROR 
10102 BIS 06 000500 MOV #BUFF SP :STACK POINTER SETUP 

010106 012737 010116 000010 MOV #1$.RTRAP “RETURN FROM TRAP POINTER 

010114 0001 JMP R :TRAP ON THIS INSTRUCTION 

010116 0227 7 010116 000474 1$: CMP #. BUFF =-4 “CHECK FOR INCREMENTED P.C. 

010124 001405 BEQ TST4 

gees 012737 000157 000302 MOV #157, SF ATAL sMOVE TO MAILBOX # *eanaee 157 seaenere 

0101 905212 INC (R2) “SET MSGTYP TO FATAL ERROR 

010136 000000 HALT 


frye P.C.,OR WRONG STSTNM 


ee ee os eee - 
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ney 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 56 SEQUENCE 
ST #43 = TEST ‘HAT “OLD’’ CC AND PRI ARE PLACED ON STACK 
906 -SBTTL TEST #43 = TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


nit didn ile atelier 


:TEST 43 - TEST THAT “‘OLD’‘ CC AND PRI ARE PLACED ON STACK 


POPP TTOTTTTITITIITLITI LITLE LILL LLL LLL LLL LLL LLL 


010140 032737 000001 177766 TST43: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010146 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
010150 01273 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
010156 1 INC (R2) “SET MSGTYP TO FATAL ERROR 
010160 T :CPU POWER BIT FOUND SET 
0101 ; 04 000001 177766 BIC #1, CPUERR =CLEAR THE BIT FOUND SET 
010170 00 337 000304 100$: INC STESIN “UPDATE TEST NUMBER 
010174 : 7 000043 000304 CMP 43 STESTN > SEQUENCE ERROR? 
010202 0 BNE ST4d 4-1 =BRANCH TO ERROR HALT ON SEQ ERROR 
907 010 12 000500 MOV WBUF F “ss :SET UP 
908 010210 0127 010226 000010 MOV #1$,RTRAP “SET UP 
909 010 18 005037 177776 CLR cc “CLEAR CC AND PRICRITY 
910 010 000257 CCC 
911 010226 100 JMP RO : TRAP 
312 010 6 0 37 ; 000476 000000 1S: CMP BUFF-2,40 “TEST THAT OLD STATUS WENT TO STACK 
010 o12787 000160 000302 MOV #160, $FATAL :MOVE TO MAILBOX # «eeexee 160 eeeeeee 
010244 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
010246 000000 HALT > INCORRECT STATUS 


:TO SCOPE REPLACE HALT WITH 240 
; AND | oes NEXT INST WITH 755 


914 010250 012706 000500 2$: MOV #BUFF.SP “SET 
915 010 54 01273 010274 000010 MOV #3$.RTRAP “SET UP 
916 10 62 012737 000357 177776 MOV #357,CC =SET PRIORITY 
917 010 0 000277 SCC *SET CC 
918 01027 100 JMP RO : TRAP 
919 010274 02 727 000476 000357 3S: CMP BUFF-2,4357 “COMPARES STATUS ON STACK 
920 010302 0 1405 BEQ TS 
010: 012737 000161 000302 MOV #161, $FATAL :MOVE TO MAILBOX # *#eteee 16] eeeeeee 
010312 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
010314 000000 HALT > INCORRECT STATUS ON STACK,OR WRONG STSTNM 
“TO SCOPE REPLACE HALT WITH 240 


[AND REPLACE NEXT INST WITH 732 
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CKKABDO 11/44 TRAPS 
TEST #44 = TEST THAT “WEW’’ STATUS IS C 


oooo 
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MACRO M1113 he's me 10:05 PAGE 57 
ORRECT 


000001 
000177 


000001 
000304 
000044 
010624 


000500 
010406 
000012 


000162 


000163 


000164 


000165 


177766 
000302 


177766 


000304 


000010 


000302 


000302 


000302 


000302 


177776 
000302 


0C0010 
600012 


me ee — eee 


B 13 
SEQUENCE 


-SBTTL TEST #44 = TEST THAT ‘NEW’ STATUS IS CORRECT 


EERE AAEEAEAEEREREEAEEEEEAEEAEAAEAERERAEAREEAKEREEEAAEAAEREEAAEAEEEREAAAEE 


“TEST 44 - TEST THAT ‘NEW’ STATUS IS CORRECT 


EEE AEAAEREEAEEEEEEEEAEAEREEAEARERAEAAEEEEEEAERAERAAAAERAAEAAAREAEAEAREEEE 


TST44: 


100$: 


1000$: 


1$: 


2$: 


3$: 


4$: 


5$: 


6$: 


4 rr 3 #43; IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 


0 ANCH AROUND CLEAR AND HALT IF CLEAR 
#177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) SET MSGTYP TO FATAL ERROR 
POWER BIT FOUND SET 
#1, CPUERR SET EAR THE BIT FOUND SET 
STESIN “UPDATE TEST R 
#44. $TESTN : SEQUENCE ERROR? 
1000$ ANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
TST45-12 - JUMP TO ERROR HALT ON SEQ ERROR 
#BUF FF “SP 
#1$,R 


RIRAPS? CLEAR FUTURE PRIORITY AND CC 
TEST FOR ‘'C’’ CLEARED 


2$ 
#162,$F ATAL :MOVE TO MAILBOX # *eeeeee 8162 eeenene 
(R2) SET se ht TO FATAL ERROR 
iC T CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
> AND REPLACE NEXT INST WITH 761 
3$ 
#163, $F ATAL :MOVE TO MAILBOX # ‘*eeeenee 163 tntenee 
(R2) :SET MSGTYP TO FATAL ERROR 
:2 NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
> AND REPLACE NEXT INST WITH 753 
4$ 
#164,SFATAL sMOVE TO MAILBOX # seeeeee 164 teennee 
(R2) : SET MSGTYP TO FATAL ERROR 
V NOT CLEARED 
‘To SCOPE REPLACE HALT WITH 240 
= AND REPLACE NEXT INST WITH 745 
5$ 
#165,SFATAL :MOVE TO MAILBOX # xeeeeee 165 teeneee 
(R2) :SET MSGTYP TO FATAL ERROR 
:C NOT CLEARED 
TO, SCOPE REPLACE HALT WITH 240 
AND REPLACE - wall INST WITH 737 
#357,CC “TEST PRIORITY 
— sMOVE TO MAILBOX # *xeeene8 skeaeee 


: SET MSGTYP TO FATAL ERROR 
NOT 0 


ZER 
‘TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 726 


*78_Rf RT RAP 


aT RTRAP+2  :SET NEW ‘‘CC’’ AND PRIORITY 


67 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 
EST #44 =~ TEST THAT “WEW’ STATUS IS CORRECT 


i 


1 000100 JMP 
338 he 7$: 
0105 1003 BM] 
105 whet 7 000167 000302 MOV 
10542 005212 INC 
10544 HALT 
938 010546 8$: 
010546 001405 BEQ 
91055 Ones 000170 000302 MOV 
oN 828 005212 INC 
0105 000000 HALT 
939 010562 9$: 
010562 108603 BVS 
0105 012737 000171 000302 MOV 
010572 005212 INC 
010574 000000 HALT 
940 010576 10$: 
010576 103405 BCS 
010600 012737 000172 000302 MOV 
Hse 005212 INC 
010610 000000 HALT 
941 010612 013706 177776 11$: MOV 
ote 010616 022706 000357 CMP 
943 010622 001405 BEQ 
010624 012737 000173 000302 MOV 
010632 005212 INC 
010634 000000 HALT 


PAGE 57-1 
RO 


8$ 

#167, $FATAL 
(R2) 

9$ 

#170, SFATAL 
(R2) 

10$ 

#171, $FATAL 
(R2) 

11$ 
#172,$FATAL 
(R2) 


CC,SP 

#357, SP 
TS745 

#173, $FATAL 
(R2) 


C 13 


;MOVE TO MAILBOX # 
:SeT ag TO FATAL ERROR 


sMOVE T 


sMOVE TO MAILBOX # 


> TRAP HERE 


sMOVE TO MAILBOX # *eeee08 
Fal ae TO FATAL ERROR 


N NOT 
*TO SCOPE REPLACE HALT WITH 
* AND REPLACE NEXT INST WITH 
sMOVE TO MAILBOX # *#eeeee8 
:SET err TO FATAL ERROR 


:TO SCOPE REPLACE HALT WITH 
SAND REPLACE NEXT INST WITH 


RAEEEKREE 


167 
$60 

07 

170 


40 
01 


171 


:V_NO 
;TO SCOPE REPLACE HALT WITH 240 


SAND REPLACE NEXT INST WITH 


O MAILBOX # **axen% 
:SET MSGTYP TO FATAL ERROR 


:C NOT SET 
;TO SCOPE REPLACE HALT WITH 
;AND REPLACE NEXT INST WITH 


kkkkhee 
:SET MSGTYP TO FATAL ERROR 
;PRIORITY WAS CHANGED, 

"TO SCOPE REPLACE HALT WITH 
;AND REPLACE NEXT INST WITH 


673 


172 


240 
665 
173 


653 


EE 


ageeeeee 


axenaneene 


geeanene 


£eeeanee 


eeeageee 


OR WRONG STSTNM 
H 240 


SEQUENCE 


68 


- TTT 


zai ei LLL LL LLL LLL LLL LL LL 


D 13 
CKKABDO 1 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 58 SEQUENCE 
TEST m5 - ‘Test THAT A TRAP OCCURES ON ALL ILLEGAL INS 
944 


| _SBITL TEST #45 - TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 
RARER AEA AEA AEREEEEE ER ETEEE AER AEERERAEAEREERAERERARARERRERARARAEERAEERERRERES 
“TEST 45 - TEST THAT A TRAP OCCURES ON ALL ILLEGAL INS 
AEE AEAEEEAEAERERAAAREAEARECATEARAARARAAAARARAREKAEAAAEEAARAAAARERAEARAAAEEREAAEREAE 
0636 032737 000001 177766 TST45: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT =CPU POWER BIT FOUND SET 
000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
000304 100$: INC STESTN “UPDATE TEST NUMBER 
000045 000304 CMP #45 STESTIN = SEQUENCE ERROR? 
006 BNE ST46-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
06 000500 MOV WBUFF. 3 :STACK POINTER SETUP 
737 010730 000010 MOV #1$,RTRAP “RETURN LOCATION 
“RESERVED INS, SHCULD TRAP 
7 000174 000302 MOV #174, $F ATAL *MOVE TO MAILBOX # kkheanee 174 shennan 
2 INC (R2) Ser MSGTYP TO FATAL ERROR 


OR WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 764 


: 






gene 
gooseee 
: 


on 
alo jle lal olelelolelelelalele! =) 


ee ce cD ce ee el ed wee ee eed eed eed eed 


ALAS 
So 
ouvnvu 


949 010730 1$: 
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| CKKABDO 11/44 TRAPS MACRO M1113 11-AQV-81 10: z. -— 59 SEQUENCE 
TEST #46 ~ TEST DEC OF STACK POINTER ON A TRAP OPERA 
950 -SBTTL TEST #46 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


SEA AAAAAAAAAAREEAEARAEAERETAAAEAARARAARAAAAAERERAAEKRARAAARAAERARAAAAAAAAAARE 


“TEST 46 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


© REE AAAEAAEAEAEAAAEREEEEEAEEEARAKERAEAARARARAAAERAAREARAAAAARAEKEAHARKEA AKA 


010730 032737 000001 177766 TST46: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
010736 001410 BEQ 100$ : CH AROUND CLEAR AND HALT IF CLEAR 
010740 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
010746 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 

10750 HALT *CPU POWER B 

10752 0427 1 177766 BIC #1, CPUERR ; CLEAR THE BIT FOUND SET 

10760 00 j 7 OOO 304 100$: INC STESTN “UPDATE TEST 

10764 2737 000046 000304 CMP #46 STESTN *SEQUENCE ERROR? 

10772 1011 BNE S147 7-1 sBRANCH TO ERROR HALT ON SEQ ERROR 
10774 12 06 000500 MOV WRUF F "ss :STACK POINTER SETUP 

11000 012737 011010 000010 MOV #1$,RTRAP =RETURN POINTER 

11006 004000 JSR RO,RO *RESERVED INS 

11010 020627 000474 1$: CMP SP. BUFF =4 “TEST DECREMENT OF SP 

11014 001405 BEQ TST47 

11016 012737 600175 000302 MOV #175, SFATAL :MOVE TO MAILBOX # teennee 175 seeenne 
11024 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 

11026 000000 HALT :NOT DECREMENTED TWO WORDS,OR WRONG $TSTNM 


;TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 761 


BABBS 
wis — 
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| CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 60 SEQUENCE 71 
TEST #47 = TEST THAT PROPER P.C. IS SAVED 
956 _SBITL TEST #47 - TEST THAT PROPER P.C. iS SAVED 


SESE RAAEAAAAAAAAAAAEAETEEEAAAAAAAAARARARAAAARAAARAEAAKAKRAKERAAAAAEAAA IATA 


“TEST 47 ~ TEST THAT PROPER P.C. IS SAVED 


“SEERA EAAEERARAAAERAEREKEEAAEAREAAAAAAEKAAEARARAAAAAKREEEKAKRAKAKRAAAAAAAARAA EAA 


011030 032737 000001 177766 TST47: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
011036 001470 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
911040 012737 000177 000302 MOV #177, $FATAL =MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
011046 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011050 HALT :CPU POWER BIT FOUND SET 
011052 042737 000001 177766 BIC #1, zCPUERR “CLEAR THE BIT FOUND SET 
011 00 237 000304 100$: INC $TE “UPDATE TEST NUMBER 
011064 022737 000047 000304 CMP a? STESTN *SEQUENCE ERROR? 
011072 001012 BNE 5750-1 =BRANCH TO ERROR HALT ON SEQ ERROR 
957 011074 012706 000500 MOV peur : : STACK POINTER SETUP 
958 011100 012737 011110 000010 MOV #1$.RTRAP “RETURN FROM T TRAP POINTER 
959 011106 904000 JSR RO.RO = TRAP ON THIS 
960 011110 022737 011110 000474 1S: CMP #1$ BUFF <4 *CHECK FOR IWCREMENED P.C. 
961 011116 001405 BEQ TST 
011120 012737 000176 000302 MOV #176,$FATAL sMOVE TO MAILBOX # eeeenee 176 eenenne 
011136 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011130 000000 HALT ‘INCORRECT P.C..0R WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
ons ‘AND REPLACE NEXT INST WITH 760 


ee 


11/44 TRAPS 
#50 - TEST THAT ‘OLD’ CC AND PRI ARE PLACED ON STACK 


963 
011138 
01114 
ot 36 
07115 
011152 
011154 
ans 
Seb EZ4 
964 011176 
965 011202 
ace 011210 
967 011214 
968 011216 
969 011220 
970 011 $8 
011 
011236 
011240 
971 011242 
972 011246 
973 011254 
974 011262 
975 011264 
976 011266 
977 011274 
011276 
011304 
011306 
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G 13 
SEQUENCE 


-SBTTL TEST #50 - TEST THAT ‘‘OLD’’ CC AND PRI ARE PLACED ON STACK 


FERRARA AAAAAEREREREEAAEE EEE ARAAARAEEAAAARAERAAREREAAEAAAAAEEARERAEAEREEE EES 


:TEST 50 - TEST THAT “‘OLD'' CC AND PRI ARE PLACED ON STACK 


PTT TITTTITTTTTT TLL LILLE LLL LLL LLL LLL LLL LLL LLL Li 


'ST50: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT : R BIT F SET 
BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
100$: INC STESIN “UPDATE TEST 
CMP #50 STESTN “SEQUENCE ERROR? 
BNE S731 1-1 sBRANCH TO ERROR HALT ON SEQ ERROR 
MOV peur F “ss :SET UP 
MOV #1$,RTRAP “SET UP 
CLR CC “CLEAR CC AND PRICRITY 
JSR RO,RO : TRAP 
1$: CAP BUFF-2,40 *TEST THAT OLD STATUS WENT TO STACK 
MOV #177,$FATAL sMOVE TO MAILBOX # eeenee 177 eaters 
INC (R2) *SET MSGTYP TO FATAL ERROR 
HALT > INCORRCT STATUS 


*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
2$: MOV #BUFF SP *SET UP 
MOV #3$_ RTRAP :SET UP 
MOV #357,CC *SET PRIORITY 


SCC sSET CC 
JSR RO,RO : 
3$: A BUFF 2. 4357 ; COMPARES STATUS ON STACK 
MOV #200, SFATAL sMOVE TO MAILBOX # teeeeee 200 teeneee 
INC (R2) ;SET MSGTYP TO FATAL ERROR 
HALT + IN NCORRECT STATUS ON STACK,OR WRONG STSTNM 


:T0 SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 732 


72 
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MACRO M1113 
"WEW'’ STATUS IS CORRECT 


000001 
000177 


000001 
000304 
000051 
011614 


000500 
011400 
000012 


000201 
000202 
000203 
000204 


177776 
000205 


011322 
000389 


177766 
000302 


177766 
000304 


000010 


000302 


000302 


000302 


000302 


000302 


000010 
000012 


lees 10:05 PAGE 62 


H 13 
SEQUENCE 8673 


-SBTTL TEST #51 = TEST THAT ‘NEW’ STATUS IS CORRECT 


SERA AAEAAAEAAERAAAAAEARAAEAAAAAAATEARARAARAAAAEARAAAAARAAAAAAEAAARETAAREAAAAAAAEEEE 


“TEST 51 = TEST THAT "'NEW'’ STATUS IS CORRECT 


en ge fumes ~ gt aaa en ge yp tg a ga ate apt 


TST51: #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
106$ CH AROUND CLEAR AND HALT IF CLEAR 
#177, $FATAL SMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) :SET MSGTYP TO FATAL ERROR 
:CPU POWER BIT FOUND SET 
#1, CPUERR :CLEAR THE BIT FOUND SET 
100$: $TESTN :UPDATE TEST 
#51,$TESTN > SEQUENCE ERROR? 
1000$ “BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
TST52=12 ; JUMP TO ERROR HALT ON SEQ ERROR 
1000$: 
#BUFF ,SP 
ais. RTRAP 
RI TRAP +2 :CLEAR FUTURE PRIORITY AND CC 
1$: in :TEST FOR ‘'C’’ CLEARED 
#201, $FATAL ;MOVE TO MAILBOX # seeeeee 201 eeeenee 
(R2) [SET MSGTYP TO FATAL ERROR 
:C NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
- ZAND REPLACE NEXT INST WITH 761 
3$ 
#202, $FATAL ;MOVE TO MAILBOX # steneee 202 seeeeee 
(R2) :SET MSGTYP TO FATAL ERROR 
:2 NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
- TAND REPLACE NEXT INST WITH 753 
4$ 
#203, SFATAL sMOVE TO MAILBOX # *xeeeee 203 eeeenee 
(R2) :SET MSGTYP TO FATAL ERROR 
:V_NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
- :AND REPLACE NEXT INST WITH 745 
5$ 
#204, SFATAL :MOVE TO MAILBOX # seeeene 204 seneeee 
(R2) [SET MSGTYP TO FATAL ERROR 
:C NOT CLEARE 
>TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 737 
5S: CC,RO :TEMP STORAGE 
#205, SFATAL SMOVE TO MAILBOX # eeneee 205 seenees 
(R2) =SET MSGTYP TO FATAL ERROR 
:PRIORITY ZERO 
>TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 727 
6$: #BUF F 
#7$ RTRAP 


#357,RTRAP+2  ;:SET NEW ‘'CC’’ AND PRIORITY 


A - 
a 


—$—<$—_—  ——$—_— EE TT 


a ee oe 


KK 
‘EST # 


 — — — eee 


11/44 TRAPS MACRO M1113 leony 10:05 
#51 - TEST THAT ‘NEW’ STATUS IS CORRECT 
993 0115 004000 JSR 
994 0115 7$: 
0115 1 93 BM] 
011524 012737 000206 000302 MOV 
0115352 005212 INC 
0115 00000C HALT 
995 Or eee 8$: 
0115 001405 BEQ 
011540 012737 000207 000302 MOV 
or 2e8 005212 INC 
011550 000000 HALT 
996 O11 28s 9$: 
011552 102405 BVS 
011554 012737 000210 000302 MOV 
011562 005212 INC 
011564 000000 HALT 
997 011566 10$: 
011566 103405 BCS 
011570 012737 000211 000302 MOV 
011576 005212 INC 
011600 000000 HALT 
998 011602 013700 177776 11$: MOV 
999 ye 022700 000357 CMP 
1000 011612 001405 BEQ 
011614 012737 000212 000302 MOV 
ABS 005212 INC 
011624 000000 HALT 


g 


SS ————eeeeeeeeeeeeeeEeEeEeEeEeEeEeEeEeEeeeee 


PAGE 62-1 


RO,RO 


8$ 
#206, $F ATAL 
(R2) 

9$ 

#207, SFATAL 
(R2) 

10$ 
#210,$FATAL 
(R2) 

11$ 
#211, SF ATAL 
(R2) 


Cc,RO 
#357.RO 

TST 

#212. SFATAL 
(R2) 


1 13 


sMOVE TO MAILBO 
:SET MSGTYP TO FATAL ERROR 


:;N_NOT dE 
;TO SCOPE REPLACE HALT WITH 
;AND REPLACE NEXT INST WITH 


; TRAP HERE 


# tekteeee 


sMOVE TO MAILU ateenee 
7 SET ae TO” FATAL ERROR 


:TO SCOPE REPLACE HALT WITH 
SAND REPLACE NEXT INST WITH 


;MOVE TO MAILBOX # teenees 
“SET MSGTYP TO FATAL ERROR 


206 


40 
10 


207 


40 
02 


210 


:V_NOT SET 
[TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 674 


sMOVE TO MAILBOX # seeaan8 
SET ae hg TO FATAL ERROR 


211 


:C_NOT 
:TO SCOPE REPLACE HALT WITH 240 
;AND REPLACE NEXT INST WITH 666 


sMOVE TO MAILBOX # *eeaane 
: SET arts Gs TO FATAL ERROR 
:PRIORITY WAS CHANGE 


212 


OR WRONG $T 


D, 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 654 


em «eee se ee 


SEQUENCE 74 


eeeeeee 


aeeneeee 


genaane 


aeeenese 


ganenee 


STNM 


— eS 


— — - - es —_— _— ee ee _ —_—— --—— — ee —--- — 
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- RKABDO. 11744 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 63 SEQUENCE 


TEST #52 = TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 
1002 -SBTTL TEST #52 ~ TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


“RAE AAEAAAAAAEAEEARAAEREAEAEARAEAERARAAAAARAAAAAAEARARAARAARAERAARAARATAAAAHAAEES 


“TEST 52 - TEST THAT A TRAP OCCURES ON AN ILLEGAL ADDRESS 


' 
' 
' 
———— —_— 


Ce ee a a eee aoa 


| 011626 032737 000001 177766 S752: BIT #1. CPUERR “SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
: 011634 001410 BEQ —S_—«d1000$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
011636 012737 000177 000302 MOVs #177.SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
| 011644 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011646 HALT “CPU POWER BIT FOUND SET 
O1es8 beo7s7 000001 177766 BIC «#1. CPUERR “CLEAR THE BIT FOUND SET 
011656 005237 000304 100$: INC  $TESTN “UPDATE TEST NUMBER 
011662 022737 000052 000304 (MP «#52. $TESTN “SEQUENCE ERROR? 
011670 001040 BNE 38 “BRANCH TO ERROR HALT ON SEQ ERROR 
1003 011672 005037 177766 CLR —s«CPUERR “CLEAR CPU ERROR REGISTER 
1004 011676 005737 177766 TST —- CPUERR “VERIFY THAT IT CLEARED 
1005 011702 001405 BEQCOtCté«é«dTmS 
011704 012737 000213 000302 MOY #213,SFATAL MOVE TO MAILBOX # sasesss 213 saeeees 
011712 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
011714 000000 HALT :CPU ERROR REG FAILED TO CLEAR 
“TO SCOPE REPLACE HALT WITH 240 
REPLACE NEXT INST WITH 765 
1006 011716 012706 000500 1$: MOV —«s #BUFF, SP STACK POINTER SETUP 
1007 011722 012737 011746 000004 MOV —«s«#2$.RTRAPS “RETURN LOCATION 
1008 011730 005737 000001 TST {ILLEGAL ADDRESS INS, SHOULD TRAP 
1009 011734 012737 000214 000302 MOV s« #214.SFATAL “MOVE TO MAILBOX # seeenes 214 seeneee 
011742 005212 INC (R2) OEY MSGTYP 10 FATAL E 
011744 000000 HALT ‘ILLEGAL ADDRESS DID NOT TRAP 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 751 
1010 011746 2$: 
1011 011746 013737 177766 000502 MOV —Ss CPUERR.RCPUER READ AND SAVE CPU ERROR REGISTER 
1012 011754 042737 177413 900502 BIC #CERMSK.RCPUER MASK OFF UNUSED BITS OF CPU ERROR REG 
1013 011762 022737 000100 900502 (MP «#100. RCPUER |: ODD ADDRESS BIT SET? 
1014 911770 00140 i BEQti«éGS 
011772 012737 000215 000302 MOV «#215, SFATAL <MOVE TO MAILBOX # seeeeee 215 eeneees 
012000 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012002 000000 HALT ZINCORRECT CPU ERROR REG CONTENTS, OR WRONG STSTNM 
"TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 93> 
1915 012004 005037 177766 4$: CLR —sCPUERR “CLEAR ODD ADDRESS BIT 


4 
T #53 = TEST DEC OF 


VVVVVVYVYN 
PIEESSLLSS 


S—=8N5 


™ 
SNS 
MmNUN™N 


&S 
gcse 


: 
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— 


ee ce ee ee ed eed ed ed ed 
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— 
© 


MACRO M1113 


kK 13 
11-NOV-81 10:05 PAGE 64 
OPERATION 


STACK POINTER ON A TRAP 


000001 
000177 

1 
000304 
000053 
000500 
012072 
000001 
000474 
000216 


177766 
00030¢ 


177766 
000304 


000004 


000302 


100$: INC 


1$: CMP 


1S153: BIT #1, CPUERR 
BEQ 100$ 
MOV #177, $FATAL 
INC (R2) 
HALT 


BIC #1, CPUERR 
STN 


6 
a STESTN 
BNE ST 34 4-1 


*aur FSP 
V #1$ RTRAPS 
SP ~ABUF F -4 
i 
MOV #216,$FATAL 
(R2) 


SEQUENCE 


-SBTTL TEST #53 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


FRAAAAAAAAAAAAAAAAEAA AAA AEE A EE AAAAAARARARARRE AERA EAAAAEAAAEAAEAEE EEA AEEE EES 


TEST 53 - TEST DEC OF STACK POINTER ON A TRAP OPERATION 


AERA AAAEAARAAAAREETEEAAAAAAAEAAAAAAAREEAAAEAEAEAAAEEAEAAEAAAEEA EATER AEA 


; SEE IF BIT 0 OF CPUERR ae MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
:SET MSGTYP TO FATAL ERROR 
U POWER FOUND SET 


: UPDATE 
; SEQUENCE ERROR? 
CH TO ERROR HALT ON SEQ ERROR 
: STACK POINTER SETUP 
“RETURN POINTER 
“RESERVED I NS 
“TEST DECREMENT OF SP 
:MOVE TO MAILBOX # 


; ERROR 
;NOT DECREMENTED TWO WORDS,.OR WRONG STSTNM 
:T0 SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 760 


seeanae 216 tetenne 


a 


L 13 
CKK 11/44 TRAPS _ M1113 11-NOV-81 10:05 PAGE 65 SEQUENCE 
TEST #54 = TEST THAT PROPER P.C. IS SAVED 


1023 -SBTTL TEST #54 = TEST THAT PROPER P.C. iS SAVED 


{RRA AAAAEAAAAAAAAEAAEAAAAEAAAEAAAAERAEAAAAARARARAAEREREREAAAEEAARAERAR EAE ES 


:TEST 54 - TEST THAT PROPER P.C. IS SAVED 


PPO TTTTTT TIT TITTLE LIL LILI LLL LLL LLL 


012112 032737 000001 177766 TST54: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
012120 001410 BEQ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
012122 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
012130 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012132 HALT =CPU POWER BIT FOUND SET 
012134 042737 000001 177766 BIC #1, CPUERR *CLEAR THE BIT FOUND SET 
012142 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
012146 022737 000054 000304 CMP #54 STESTIN = SEQUENCE ERROR? 
012154 001013 BNE TST 135 5-1 “BRANCH TO ERROR HALT ON SEQ ERROR 
1024 012156 012706 000500 MOV #BUF ee: STACK POINTER SETUP 
1025 012162 012737 012174 000004 MOV #1$,RTRAPS “RETURN FROM TRAP POINTER 
1026 012170 005737 000001 TST 1 = TRAP ON THIS INSTRUCTION 
1027 012174 022737 012174 000474 1$: CMP #1$,BUFF=-4 “CHECK FOR INCREMENTED P.C. 
1028 012202 001405 BEQ TST 
01 204 012737 000217 000302 MOV #217, $F ATAL :MOVE TO MAILBOX # ‘eeeeeee 217 senenee 
012212 005212 INC (R2) SET MSGTYP TO FATAL ERROR 
012214 000000 HALT * INCORRECT P.C.,0R WRONG 


$TS 
:TO0 SCOPE REPLACE HALT WITH Py 40 
sAND REPLACE NEXT INST WITH 757 


ce ee ea a: ec I ET LE LLL LL LL A LLL LLL LALA LLL LL LLL LLL LLC LA 


77 


—_— ——— A TTT 
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— CKKABDO 11/44 TRAPS MACRO M1113 11-NOV~-81 10:05 PAGE 66 SEQUENCE 
TEST #55 = TEST THAT “‘OLD*’ CC AND PRI ARE PLACED ON STACK 
1029 -SBTTL TEST #55 = TEST THAT ‘OLD’ CC AND PRI ARE FACED ON STACK 


SERA AAEEEEAAEAAAAKAAEAEAAAAAAERAERERAAARAAEARAARAEAARAAAAAREARARAKAAAAAREAAE 


“TEST 55 = TEST THAT “‘OLD'' CC AND PRI ARE PLACED ON STACK 


REE AAAAEEEEAEAAAEEAAEAAAAEEAAAAAEEAAAAAAAARERAEAREARARATARARAAAAAAAAAEAEE 


012216 032737 000001 177766 TST55: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
912224 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
012 36 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
01 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012236 900000 HALT =CPU POWER FOUND SET 
012240 0427 ? 1 177766 BIC #1. 2 CPUERR “CLEAR THE BIT FOUND SET 
012246 005237 000304 100$: INC $TE “UPDATE TEST NUMBER 
61 52 022737 000055 000304 CMP #35, STESTN > SEQUENCE FRROR? 
01 1050 BNE 5756-1 :BRANCH TO ERROR HALT ON SEQ ERROR 
1030 012262 000405 BR 90S :BRANCH OVER UNUSED ERROR CODE 
1031 012264 012737 000220 000302 MOV #220, $FATAL “MOVE TO MAILBOX # ‘*eteeee 220 seeenee 
012272 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012274 000000 HALT ; ERROR 177 RESERVED FOR CPU POWER BIT FOUND SET 
“TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 771 
1032 01 276 012706 000500 90$: MOV #BUFF SP SET UP 
1033 012302 012737 012322 000004 MOV #1$,RTRAPS “SET UP 
1034 012310 005037 177776 CLR CC “CLEAR CC AND PRIORITY 
1035 012314 000257 CCC 
1036 012316 005737 000001 TST 1 : TRAP 
1037 01 322 023727 000476 000000 1S: CMP BUFF-2,#0 “TEST THAT OLD STATUS WENT TO STACK 
1038 012330 001405 BEQ 
012832 012737 000221 000302 MOV #221, $FATAL :MOVE TO MAILBOX # **eeexe 221 seeenee 
012340 005212 INC (R2) ;SET MSGTYP 7 FATAL ERROR 
012342 000000 HALT ; INCORRECT STATUS 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 746 
1039 012344 012706 000500 2$: MOV #BUFF.SP “SET UP 
1040 012350 012737 012372 000004 MOV #3$,RTRAPS “SET UP 
1041 012356 012737 000357 177776 MOV #357,CC *SET PRIORITY 
1042 012364 000277 SCC “SET CC 
1043 01 005737 000001 TST 1 : TRAP 
1044 012372 023727 000476 000357 3$: CMP BUF F-2,4357 =COMPARES STATUS ON STACK 
1045 012400 001405 BEQ TS 
012402 012737 000222 000302 MOV #222, $FATAL :MOVE TO MAILBOX # *eexee 222 seaneee 
012410 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
012412 000000 HALT “INCORRCT STATUS ON STACK,OR WRONG STSTNM 


>TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 722 


eee ee 


‘ 
ee ee 


—_ _ —_—— eee ee ee ee - - -- ——— oo 
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| CRKABDO 11/44 TRAPS. ,. MACRO M1113. 11-NOV-B1 10:05 PAGE 67 SEQUENCE 79 
TEST #56 - TEST THAT "NEW STATUS 1S CORRECT 
1046 .SBITL TEST #56 - TEST THAT "NEW'' STATUS IS CORRECT 
| RRA AERA ER EEAA AAA RARAARARERAARERAERAERRE ERE EREAAAAEE ERE ES 
| STEST 56 - TEST THAT “NEW' STATUS IS CORRECT 
| POPP r errr TTT TTT TTT TITTLE TLL ELE 
012414 032737 000001 177766 TST5S6: BIT  § #1,CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
| 012422 001410 BEQsi SBRANCH AROUND CLEAR AND HALT IF CL 
| 012604 012737 000177 000302 MOV « #177,S$FATAL —«-:MOVE_SPECIAL POWER MONITOR FATAL # TO SFATAL 
012432 005212 INC — (R2? SSET MSGTYP TO FATAL ERROR 
| 012434 000000 HALT “CPU POWER BIT FOUND SET 
012436 042737 000001 177766 BIC #1, CPUERR SCLEAR THE BIT FOUND SET 
012444 005237 000504 100$: INC  $TESTN ZUPDATE TEST NUMBER 
012450 022737 000056 000304 (MP ss #56, STESTN : SEQUENCE ERROR? 
012456 001402 BEQ ~=ss«1000$ SBRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF Ok 
012460 000137 012726 IMP = TSTS7=12 ;JUMP TO ERROR HALT ON SEQ ERROR 
012464 1000S: 
1047 012464 012706 009500 vs #BUFF SP 
1048 012470 012737 012506 000004 MOV - #1$,RTRAPS 
1049 012476 005037 000006 CLR —aRTRAPS+2 :CLEAR FUTURE PRIORITY AND CC 
1050 012502 005737 000001 STRAP HERE 
1051 012506 1S: STEST FOR "'C'’ CLEARED 
1052 012506 100005 BPL sé 
012510 012737 000223 000302 MOV #223, SFATAL =; MOVE _TO MAILBOX # ‘ennee 223 seennes 
012516 005212 INC (Re) :SET MSGTYP TO FATAL ERROR 
012520 000000 HALT :C NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 760 
1053 012522 2s: 
012522 001005 BNE 3S 
912924 012737 000224 000302 MOV #224, SFATAL =; MOVE _TO MAILBOX # teeenes 224 teeenee 
012532 005212 INC (Rd) :SET MSGTYP TO FATAL ERROR 
012534 000000 HALT :2_NOT CLEARED 
:TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 752 
1054 012536 38: 
012536 102005 Bvc 4S 
012540 012737 000225 000302 MOV #225, $FATAL = ; MOVE _TO MAILBOX # seeeens 225 saannes 
012946 005212 INC _—(R2) :SET MSGTYP TO FATAL ERROR 
012550 000000 HALT V NOT CLEARED 
STO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 744 
1055 012552 4$: 
012552 103005 Bcc s«*SS 
012554 012737 000226 000302 MOV  #226,$FATAL =; MOVE _TO MAILBOX # texeeee 226 eeenens 
012562 005212 INC _—(R2) :SET MSGTYP TO FATAL ERROR 
012564 000000 HALT :C NOT CLEARED 
TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 736 
1056 012566 032737 000357 177776 S$: BIT -4357.CC STEST PRIORITY FOR ZERO 
1057 012574 001405 BEQ 
012576 012737 000227 000302 MOV «#227, SFATAL =; MOVE _TO MAILBOX # teeexee 2270 sexnnne 
012604 005212 INC (RO) :SET MSGTYP TO FATAL ERROR 
012606 000000 HALT :PRIORITY NOT ZERO 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 725 
1058 012610 012706 000500 6$: MOV -—s- ABUFF., SP 
1059 012614 012787 012634 000004 MOV —«-#7$, RTRAPS 
1060 012622 012737 000357 000006 MOV -#357,RTRAPS+2 ©; SET NEW “'CC’* AND PRIORITY 
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11/44 TRAPS 


6 

1062 01 ie 
0126 
126 


ed aed ed ed od 
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NONSS 
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MACRO M1113 Veemy st 10:05 
~ TEST THAT ‘NEW’ STATUS IS CORRECT 


000001 


000230 000302 


000231 


000232 


000233 


177776 
000357 


000234 


000302 


000302 


000302 


000302 


7$: 


10$: 


11$: 


TST 


HALT 


B 14 
PAGE 67-1 


1 


8$ 

#230, SFATAL 
(R2) 

9$ 

#231, SFATAL 
(R2) 

10$ 

#232, SFATAL 
(R2) 

11$ 

#233 ,SFATAL 
(R2) 


ooh RO 
TST5? 
#23. ~SFATAL 





;MOVE TO 
:SET MSGTYP TO FATAL ERROR 


iN S 
:TO SCOPE REPLACE HALT WITH ag 
sAND REPLACE NEXT INST WITH 


- oe ee eee we 


; TRACE HERE 


eeeeeee 


MAILEOX # 230 


sMOVE TO MAILBOX # *«eeeane 
: SET “gh TO FATAL ERROR 


‘TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 677 


231 


sMOVE TO MAILBOX # teaneee 232 


7 SET ae TO FATAL ERROR 


:V S 
:TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 671 


sMOVE TO MAILBOX # xeeeexe 233 


7 SET eh TO FATAL ERROR 


:C NOT SET 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 663 


geenene 


geeeneae 


eeaenaeee 


geeenee 


sMOVE TO MAILBOX # xeeenee 234 eeeenee 
“SET MSGTYP TO FATAL ERROR 

=PRIORITY HANGED OR WRONG STSTNM 
"TO SCOPE REPLACE HALT WITH 240 


SAND REPLACE NEXT INST WITH 651 


SEQUENCE 


C 14 


ee _—- eee eee -_—_— — ee 


(kK "1/44 TRAPS MACRO M1113 11-NOV-81 10:05 —— 68 SEQUENCE 81 
TEST #57 = TEST THAT DEC R6 TO A VALUE LESS 400 TRAP 


FRRAAAAAAAAEAARAEAAAAAEAAA AE AAAAAAAAAAAARAREEEAAAAEAARAEARERAAAAAEEAAARAEAES 


;TEST 57 - TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


SEERA EAAAEEAEAEEEAEEAEAAAAAAAAEAAEAEARAAAEAAAEAAEAAAAAEARAAAREAREEAEAAREARAEAAEES 


| 
1069 ~SBTTL TEST #57 - TEST THAT DEC R6 TO A VALUE LESS 400 TRAPS 


OI rie 032737 000001 177766 TST57: BIT #1,CPUERR ;SEE IF BIT 0 OF CPUERR or MONITOR BIT) IS SET 
012746 001410 BEQ 160$ ; CH AROUND CLEAR AND HALT IF CLEAR 
012750 geese 000177 000302 MOV #177 ,SFATAL sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
012756 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
012760 HALT :CPU POWER BIT FOUND SET 
01 186 04 000001 177766 BIC #1, CPUERR ;CLEAR THE BIT FOUND SET 
0127 BO 36 7 000 100$: INC STESTN :UPDATE TEST NUMBER 
012774 Ose 7 000057 000304 CMP #57, STESTN : SEQUENCE ERROR? 
015002 {067 BNE 2$ ;BRANCH TO ERROR HALT ON SEQ ERROR 
1070 013004 005037 177766 CLR CPUERR CLEAR cru ERROR REGISTER 
1071 013010 012706 000150 MOV #150,R6 :R6 = 150 
107% 013014 012737 013036 000004 MOV #1$,4 : STACK OVERFLOW ae POINTER 
1073 013022 005746 TST ~(R6) sWITH R6 = 150 S D TRAP 
1074 013024 012737 000235 000302 MOV #235, $FATAL MOVE TO MAILBOX # & weneees 235 theeeee 
013032 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
013034 000000 HALT ;SHOULD HAVE TRAPPED,OR WRONG STSTNM 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 762 
1075 013036 1$: 
1s 013036 013737 177766 000502 MOV CPUERR,RCPUER ;SAVE CPU ERROR REGISTER 
1077 013044 042737 177413 000502 BIC #CERMSK,RCPUER :MASK OFF UNUSED CPU ERRCR REG BITS 
1078 013052 022737 000004 000502 CMP #4,RCPUER ;1S YELLOW ZONE BIT SET? 
1079 Ol enes 001405 - BEQ 3$ 
013062 012737 000236 06003502 MOV #236,$FATAL sMOVE TO MAILBOX # stexeee 236 teeenee 
013070 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
0135072 0 HALT ; INCORRECT CPU ERROR REGISTER CONTENTS, OR WRONG STSTNM 
;TO SCOPE REPLACE HALT WITH 240 


;AND REPLACE NEXT INST WITH 743 
1080 013074 005037 177766 3$: CLR CPUERR ;CLEAR YELLOW ZONE BIT 


re ee 





MACRO M1113 


Dg = 1 10:05 PAGE 69 


TEST #60 = TEST FOR DEC OF R6 ON OVERFLOW T 


NEST a6 11/44 TRAPS 


1081 
013100 032737 000001 
01 198 001410 
01311 ar Let 000177 
013116 00521 
0131 
0131 ¢ 000001 
0131 00 $ 7 000304 
4 1 ase 7 000060 
13142 at 
1086 013144 O12 96 000150 
1083 013150 oist? 013160 
1084 01 138 + 738 
1085 0131 206 000142 
1086 013164 001405 
01 196 012737 000237 
013174 005212 
013176 000000 


177766 
000302 


177766 
000304 


000004 


000302 


-SBTTL TEST #60 - TEST ¢ 


SEQUENCE 


® DEC OF R6 ON OVERFLOW TRAP 


EERE AERAAAAEAREAEEEEERETAEEAEAAEAAAAAEAAAAAAAARAEAAAAEAERAEAAEAEAEAEAAAAAAEEE 


“TEST 60 - TEST FOR DEC OF R6 ON OVERFLOW TRAP 


REA AEAEAAEEAAAEREEEEEAAAEAARAAARERAREEAREKEAAAEERAAAAERERAEAREREEEEATED 


TST60: BIT #1, CPUERR 
BEQ 1 
MOV #177, $F ATAL 
INC (R2) 
HALT 
BIC #1, CPUERR 
100$: INC STESTN 
CMP #60,$TESTN 
BNE TST61-12 
MOV #150,R6 
MOV #1$,4 
TST -(R6) 
1$: CMP R6,4142 
BEQ TST61 
MOV #237, SF ATAL 
INC (R2) 
HALT 


; SEE IF BIT 0 OF CPUERR = MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 
Ay FATAL # TO SFATAL 


TE TEST 
® SEQUENCE ERROR? 
“RG = e— H TO ERROR HALT ON SEQ ERROR 
; TRAP POINTER 
WITH R6 = 150 SHCULD TRAP 
‘DID R6 DECREMENT 


sMOVE TO MAILBOX # **eae2% 2357 
: SET MSGTYP TO FATAL ERROR 

:R6 NOT = 142,0R WRONG STSTNM 

*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 


Reeaanee 


82 
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CKKABDO 11/44 
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MACRO M 


000001 
000177 
000001 
000304 
000061 
000150 
000146 
013264 
000146 
000240 


001000 
000400 
013336 


000241 


000400 
013364 


000242 


I 
er re a ee ee 


M1113 


177766 
000302 


177766 
000304 


000004 


000302 


000004 
000302 


000004 


000302 


a 10:05 PAGE 70 


E 14 
SEQUENCE 


-SBTTL TEST #61 - TEST DIFFERENT TYPES OF OVERFLOW 


FREER AEA EAE REAAAAAEAE AAA EE EAA AAEARARAEAAAARERARERAAE ARETE RARER ERE EES 


;TEST 61 - TEST DIFFERENT TYPES OF OVERFLOW 


ee ee enn ann eee pares 


1ST61: BIT #1, CPUERR :SEE IF BIT 0 UF CPUERR (POWER MONITOR BIT) IS SET 
BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
MOV #177, S$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
INC (R2) ;SET MSGTYP TO FATAL ERROR 
HALT POWER BIT FOUND SET 
BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
100$: INC STESTN ‘UPDATE TEST NUMBER 
CMP #61,$TESTN *SEQUENCE ERROR? 
BNE TST62-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
MOV #150,R6 
CLR 146 :STATUS WORD OF LOC 10 
MOV #1$,4 “RETURN TO LOC 4 
INC =(6) 
1$: TST 146 
BNE 2$ 
MOV #240, $FATAL -MOVE TO MAILBOX # *teeeex 240 seeeene 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT ‘ INCREMENT OPERATION NOT INHIBITED 
>TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 757 
2$: MOV #1000,R5 
MOV #400,R6 
MOV a38, é 
CMPB  —s_- = (R6) , = (RS) 
MOV #261, $FATAL :MOVE TO MAILBOX #& ‘*eexeex 241 sxeenene 
INC (R2) SET BSGTYP TO FATAL ERROR 
HALT *STACK = 400 AND DECREMENTED, SHOULD TRAP 
TO SCOPE REPL NACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 742 
38: MOV #400 ,R6 
MOV 
= BITB <-(R5),-(R6) 
MOV #262, $F ATAL <MOVE TO MAILBOX # *eeeeee 242 exeeenee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “NO STACK OVERFLOW, OR T 
“TO SCOPE REPLACE HALT WITH 240 
i “AND REPLACE NEXT INST WITH 727 
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+ CKKABDO 11/44 _ TRAPS MACRO M1113 11-NOV-81 me 05 PAGE 71 SEQUENCE 
TEST #62 - TEST THAT AN 10 CAUSES AN OVERFLOW T 


.SBTTL TEST #62 ~- TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


sRRAAAAEAE AAA AAAAERAAAEAAEAAAAAEAAERAARERAAARERARRAERERAAAEEEAAR EEE ERAS 


;TEST 62 ~- TEST THAT AN 10 CAUSES AN OVERFLOW TRAP 


PP OTTOTTTTITITITI TITTLE LLL LLL LLL LLL 


1114 


Oe 032737 000001 177766 TST62: BIT #1, CPUERR ; SEE IF BIT O OF CPUERR (POWER MONITOR BIT) IS SET 
013372 001410 BEQ 100$ CH AROUND CLEAR AND HALT IF CLEAR 
013374 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
013402 005212 INC (R2) :;SET MSGTYP TO FATAL ERROR 
013404 HALT R BIT SET 
013406 042 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
013414 0052 7 000304 100$: INC $TESTN “UPDATE TEST 
013420 022 37 000062 000304 CMP #62,$TESTN “SEQUENCE ERROR? 
01 1011 BNE :BRANCH TO ERROR HALT ON SEQ ERROR 
HE Spies: 000400 MOV #400,R6 is ve x * TO OVERFLOW 
013434 012737 013452 000010 MOV #1$,10 ;SET uP 10 V 
01 : 012737 013464 000004 MOV #2$.4 SEY. Op OO VERF LOW VECTOR 
01 3 000010 m 10 “THIS TRAP SHOULD CAUSE OVERFLOW 
PETES: 012737 600243 000302 MOV #243, $F ATAL :MOVE TO MAILBOX # ‘*eeneex 243 seeneee 
013460 005212 INC (R2) : SET MSGTYP TO FATAL ERROR 
013462 000000 HALT “TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG $TSTNM 
“TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 761 
013464 012737 000012 009010 2s: MOV #10+2,10 
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MACRO M1113 11-NOV-81 18:8 05 PAGE 72 
TEST #63 - TEST THAT AN IOT CAUSES AN OVERFLOW T 


000001 
000177 


000001 
000304 
000063 


000400 
013560 
013572 


000244 


000022 


177766 
000302 


177766 
000304 


000020 
000004 


000302 


000020 


ec ee ee 
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SEQUENCE 


-SBTTL TEST #63 ~- TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 


RARER AEAAAAREEERAAEREEAEAEAEEE RAR AEEAERERAAAEEAEARAAEEAAAARRARERAEERAEREERERES 


;TEST 63 ~- TEST THAT AN IOT CAUSES AN OVERFLOW TRAP 


PTT T TTT TTT TITT TILL TLL LLL LLL LLL LLL LLL LLL 


TST63: 


100$: 


1$: 


2$: 


at 


#1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
100$ : CH AROUND CLEAR AND HALT IF CLEAR 
#177, $SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
(R2) ‘SET MSGTYP TO FATAL ERROR 
*CPU POWER BIT FOUND SET 
#1, CPUERR *CLEAR THE BIT FOUND SET 
T “UPDATE TEST NUMBER 
#63,$TESTN * SEQUENCE ERROR? 
‘BRANCH TO ERROR HALT ON SEQ ERROR 
#400,R “SET UP STACK TO OVERFLOW 
#1$, 30° :SET UP I0T VECTOR 
#2$.4 -SET UP OVERFLOW VECTOR 
“THIS TRAP SHOULD CAUSE OVERFLOW 
#244, $F ATAL sMOVE TO MAILBOX # *eeeeee 244 eeeeeen 
(R2) ;SET MSGTYP TO FATAL ERROR 
“TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
"TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 761 
#20+2,20 
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1116 


_CKKABDO 1 
| iTEST rs an - ‘Test THAT AN 


RRR ROO 


ao 


COSDOSDDDO0D0OOCOCCO 


eS Ls Le ee ee eee 


ae 
oO 


oO 
ad 
nw 
~ 
© 
© 


4 TRAPS 


_ 
WM 
yNe~N 
AWG 
NuNoOoN 


se eee 
Man ch te 


s 3 
Nm oun 
™ 

3 8 

™N 


MACRO M1113 
EMT CAUSES AN OVERFLOW T 


000400 
013666 
013700 


000245 


000032 


177766 
000302 


177766 
000304 


000030 
000004 


000302 


000030 
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SEQUENCE 


.SBTTL TEST #64 - TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


FER AAAAAEAEAARA AAA AERA AAA AERA AAEAAAAAAAAAAERAERARERERAAAAARAAAAR AEE RAEEES 


:TEST 64 - TEST THAT AN EMT CAUSES AN OVERFLOW TRAP 


TTT TTOTITITI TITTLE LLL TLL LLL LLL LL LLL 


TST64: 


100$: 


2$: 


#1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
100$ -SBRANCH AROUND CLEAR AND HALT IF CLEAR 
#177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
(R2) “SET MSGTYP TO FATAL ERROR 
[CPU POWER BIT FOUND SET 
#1, CPUERR “CLEAR THE BIT FOUND SET 
$TESTN “UPDATE TEST ER 
#64, $TESTN : SEQUENCE ERROR? 
‘BRANCH TO ERROR HALT ON SEQ ERROR 
#400,R6 “SET UP STACK TO OVERFLOW 
#1$,30 ;SET UP EMT VECTOR 
#2$,4 =SET UP OVERFLOW VECTOR 
*THIS TRAP SHOULD CAUSE OVERFLOW 
#245 SF ATAL :MOVE TO MAILBOX # *seaaneee 245 seeanne 
(R2) SET MSGI YP TO FATAL ERROR 
“TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
#30+2,30 
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MACRO M1113 11-NOV-81 ee He PAGE 74 


000001 
000177 
000001 
000304 
000065 
000400 


013774 
014006 


000246 


000036 


177766 
000302 


177766 
000304 


000034 
000004 


000702 


000034 


SEQUENCE 


.SBTTL TEST #65 - TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 


REE AEEAERERAREAAEEAAAAEAEEAAAAAAAREARAARAAARAEAAAAAAHERAAAAARAREAAEREAAAEAARS 


“TEST 65 - TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 


EEE AEAEAAEAEAAAAEEAEAEAAERERAAAAAERAARAAAAAEAEAAAAAAAAARAERAERERH AAAS 


TST65S: 


100$: 


2$: 


#1, CPUERR 
100$ 
#177, SFATAL 
(R2) 
#1, CPUERR 
TESTN 
#65,$TESTN 
#400,R6 
#1$,34 :SET UP T 
#2$.4 
#246, $F ATAL 
(R2) 


#3442 ,34 


“MOVE SPECIAL POWER MONI 


‘3 SEE i or 0 OF CPUERR (POWER MONITOR BIT) IS SET 


OUND CLEAR AND HALT IF CLEAR 
TOR FATAL # TO SFATAL 
7 SET ae’ ait TO FATAL cr 


:CPU POWER BIT FOUND 
:CLEAR THE BIT FOUND SET 
NUMBER 


SUPDATE TEST 
; SEQUENCE ERROR? 
:BRANCH TO OR HALT ON SEQ ERROR 


ERR 
Ft 3 UP STACK TO OVERFLOW 
RAP VECTOR 


;SET UP OVERFLOW VECTOR 
;THIS TRAP SHOULD CAUSE OVERFLOW 


sMOVE TO MAILBOX # seaeaex 246 
:SET MSGTYP TO FATAL E 


xgeannane 


® AND REPLACE NEXT INST WITH 761 
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MACRO M1113 
TEST #66 = TEST THAT AN TRT CAUSES AN OVERFLOW T 


000016 


177766 
000302 


177766 
000304 


000014 
000004 


000302 


000014 
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11-NOV~81 O38 05 PAGE 75 


SEQUENCE 


.SBTTL TEST #66 - TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


sRAAAEAAEAAAAAEAAAAAEAA TARA EEAAAAERAEAARAREAAEEAAAERAAAERAERERAEE ERAT AREAS 


:TEST 66 - TEST THAT AN TRT CAUSES AN OVERFLOW TRAP 


PPO TTOTITTITITITITI TLL LILI LL LLL LLL LLL LLL 


TST66: 


100$: 


2$: 


#1, CPUERR 
#177, SFATAL 
(R2) 
#1,CPUERR 
STESTN 
#66,S$TESTN 
#400 ,R6 
#1$,14 
#2$,,4 


:SET UP 


#247 ,SFATAL 
(R2) 


#144+2,14 


: SEE IF BIT 0 OF awe — MONITOR BIT) IS SET 
CH AROUND AR AND HALT IF CLE 
“MOV VE SPECIAL POWER MONITOR FATAL # TO SFATAL 


:SET MSGTYP TO FATAL ERROR 

POWER BI ET 
CLEAR THE B ET 
UPDATE a 3 NUMBER 


:BRANCH TO ERROR HALT ON SEQ ERROR 
iSET UP oe _ TO OVERFLOW 
7 SET uP OVERFLOW VECTOR 
;THIS TRAP SHOULD CAUSE OVERFLOW 


sMOVE TO MAILBOX # seeaeee 247 
;SET MSGTYP TO FATAL ERROR 

:TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 

:AND REPLACE NEXT INST WITH 761 


eeeaanee 


eee ee | eee eee - ee > —--—-- 
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| SKRABDO 11/44 TRAPS MACRO M1113 11-NOV-81 eS 33 PAGE 76 SEQUENCE 
TEST #67 = TEST THAT AN ILLA CAUSES AN OVERFLOW T 
1119 -SBTTL TEST #67 - TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


FRRAAAAEAAAAAEAAAAAAEEAAEAA AAA AAAAERAAEARAEAAEARERAAERAERARAAAEAERARARE EAA E REESE 


| :TEST 67 - TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 


PP OTTSTTTTITITITITI TLL LLL LE LLL LLL LLL LLL 


014122 032737 000001 177766 iS167: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 

| 014130 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 

014132 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
014149 212 INC (R2) “SET MSGTYP TO FATAL ERROR 
01414 HALT *CPU POWER BIT FOUND SET 
014144 04 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
014152 005237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
014156 0227 7 000067 000304 CMP #67,$TESTN “SEQUENCE ERRCR? 
014164 001011 BNE 1 “BRANCH TO ERROR HALT ON SEQ ERROR 
014166 012706 000400 MOV #400,R6 “SET UP STACK TO OVERFLOW 
014172 012737 014210 000010 MOV #1$,.10 ;SET UP ILLA VECTOR 
014200 012737 014222 000004 MOV #2$.4 :SET UP OVERFLOW VECTOR 
O14 06 004700 m ILLA *THIS TRAP SHOULD CAUSE OVERFLOW 
014210 012737 000250 000302 MOV #250, $FATAL :MOVE TO MAILBOX # teeeeee 250 seeenee 
014216 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
014220 000000 HALT “TRAP FLAG OVERFLOW DID NOT OCCUR,OR WRONG STSTNM 

-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
014222 012737 000012 000010 28: MOV #10+2,10 
1120 014230 020627 000370 CMP R6,4370 :STACK PUSHED FOUR WORDS? 
1121 014234 001405 BEQ TST 
014256 012737 000251 000302 MOV #251, $FATAL :MOVE TO MAILBOX # ‘*teeeee 25] xenenee 
014244 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
014266 000000 HALT “CORRECT # (4) OF WORDS WERE NOT PUSHED ONTO STACK 
*TO SCOPE REPLACE HALT WITH 240 


:AND REPLACE NEXT INST WITH 746 


nae 
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_CKK 11/44 TRAPS MACRO M1113. 11-NOV-81 10: 305 PAGE 77 SEQUENCE 90 
TEST #70 = TEST THAT AN ILLB CAUSES AN OVERFLOW 
1122 .SBTTL TEST #70 - TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 
{RARER AAAAEAAAAAEAAA AE AAAAAEAAAAAAAAAARARRERAERARAARAERARAERAE RARER A ERE ES 
| “TEST 70 - TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 
ERASE AEAAAEAEAEARAAAEATAAAETAAERAAREAREREARAARERAARARAEREREAAARAREREAAAAAAKERE 
| 014250 032737 000001 177766 {TST70: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
014256 001410 BEO 100$ CH_ AROUND CLEAR AND HALT IF CLEAR 
| 014260 012737 000177 000302 MOV #177, $FATAL “MOVE SPEC!AL POWER MONITOR FATAL # TO SFATAL 
014 66 §212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
014 HALT POWER BIT FOUND SET 
014272 04 1 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
014 005237 000304 100$: INC $TESTN “UPDATE TEST 
014 022 37 000070 000304 CMP #70,$TESTN “SEQUENCE ERROR? 
014312 001011 BNE 1$ “BRANCH TO ERROR HALT ON SEQ ERROR 
014314 01 706 000400 MOV #400,R6 “SET UP STACK TO OVERFLOW 
0143 0 012737 014336 000010 MOV #1$,10 ;SET UP ILLB VECTOR 
014326 612737 014350 000004 MOV #2$.4 -SET UP OVERFLOW VECTOR 
0143 000100 * ILLB “THIS TRAP SHOULD CAUSE OVERFLOW 
Ores 012737 000252 000302 MOV #252, $FATAL :MOVE TO MAILBOX # teeenee 252 senenee 
014344 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
014346 000000 HALT ; TRAP FLAG OVERFLOW DID NOT OCCUR.OR WRONG STSTNM 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 761 
014350 012737 000012 000010 28: MOV #10+2,10 


1123 


a er ee 


ae 
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M14 
| Se Ae TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 78 SEQUENCE 


- TEST FOR FALSE OVERFLOW TRAP 


1124 _SBITL TEST #71 - TEST FOR FALSE OVERFLOW TRAP 
sR AAAAEAAAAAAAA AAA EAA AAE RET EAAAARAAEARAAAAREARERERAERAREA RARER AEAEE RARER ES 
“TEST 71 - TEST FOR FALSE OVERFLOW TRAP 
“SEERA AEEAEAAEREEEAEAEARARAEAEEEAEEAARERARERAEKEAEARERARARARAEAAAAAEAEEE 
014356 032737 000001 177766 TST71: BIT #1. CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
014364 001410 BEQ 100$ CH AROUND CLEAR AND HALT IF CLEAR 
014 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
014374 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
014376 HALT :CPU POWER BIT FOUND SET 
014400 04 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
014406 00 é 7 000304 100$: INC STESTN “UPDATE TEST 
014412 022 ? 000071 000304 CMP #71,$TESIN “SEQUENCE ERROR? 
— 01442 1023 BNE 1$ “BRANCH TO ERROR HALT ON SEQ ERROR 
1126 014422 012737 014470 000004 MOV #1$.4 :SET UP OVERFLOW POINTER 
1197 0144 012706 001002 MOV #1002, R6 
1128 014434 005746 TST : SHOULD NOT OVERFLOW 
1189 014436 012706 002002 MOV #2002. R6 
1130 014442 005746 TST (R6) :SHOULD NOT OVERFLOW 
1131 014444 012706 004002 MOV #4002,R6 
1138 014450 05746 TST ~(R6) :SHOULD NOT OVERFLOW 
1133 014452 012706 010002 MOV 10002, R6 
1134 0144656 005746 TST R6) 
1135 014460 012706 020060 MOV #20000, R6 :SHOULD NOT OVERFLOW 
1136 014464 005746 TST 
aa Tp ~~ 
014470 012737 000253 000302 MOV #253, $F ATAL :MOVE TO MAILBOX # *keenee 253 seeenes 
014476 005212 INC (R2) “SET MSGTYP TO FATAL ER 
014500 000000 HALT : STACK OVERFLOWED,OR WRONG S$TSTNM 
TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 747 
1138 014502 012737 000006 000004 2%: MOV #6.4 
1139 014510 005037 000006 CLR é 
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| CKK 11/44 TRAPS — M1113 11-NOV-81 10: so Peas 79 SEQUENCE 92 
TEST #72 = TEST THAT BIT 4 PSW WILL CAUSE A TRAP T 
1140 -SBTTL TEST #72 - TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 


{EAA AAAAAAAAAAEAAAE AREER AEAA EERE AAR ERA RARER AAAERARARERARAEARAERARARAA ETHER EES 


:TEST 72 - TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 


PPO TT TTT TTT TTT T TTL LLL LLL LLL LLL LLL LLL 


014514 032737 000001 177766 iS172: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
014522 001410 BEQ 100$ *BRANCH AROUND CLEAR AND HALT IF CLE 
014524 01273 000177 000302 MOV #177, S$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
014532 212 INC (R2) “SET MSGTYP TO FATAL ERROR 
0145 HALT “CPU POWER BIT FOUND SET 
014536 04 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
014544 237 000304 100$: INC STESTN “UPDATE TEST NUMBER 
014550 022737 000072 000304 CMP #72, $TESTN = SEQUENCE ERROR? 
014556 001013 BNE Ist 73 3-1 *BRANCH TO ERROR HALT ON SEQ ERROR 
1141 014560 012706 000500 MOV ; 66 
1148 014564 012737 014620 000014 MOV #38 RTRAPS SET uP TO TRAP TO 14 
1143 014572 012746 0000 MOV #20,-(SP) :PUSH T BIT 
1128 14008 900008 — PUSH PC 
1146 014604 000240 1$: NOP “TRAP HERE 
1147 014606 012757 000254 000302 MOV #254, S$FATAL “MOVE TO MAILBOX # texan 254 seneeee 
014614 005212 INC (R2) SET MSG) YP TO FATAL ERROR 
014616 000000 HALT ; TRACE BIT DID NOT TRAP!,OR WRONG $TESTN 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 757 
1148 014620 2$: 
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MACRO M1113 11-NOV-81 10:05 PAGE 80 


000001 
000177 


000001 
000304 
000073 


000500 
014724 
000020 
014710 


000255 


000474 
000256 


177766 
000302 


177766 
000304 
000014 


000302 


000302 


- TEST STACK POINTER DECREMENTS 


SEQUENCE 93 


-SBTTL TEST #73 - TEST STACK POINTER DECREMENTS 


{ERA AEA AERA EEE EERE REE AERA ERERERAARA EAE ERRERERERAR AERA E ES 


[TEST 73 - TEST STACK POINTER DECREMENTS 


PP TT TTT TTT TITTLE LEE LLL LLL LLL LLL LLL 


TS173: 


100$: 


1$: 


2$: 


BIT 


#1,CPUERR 

100$ 

#177, SFATAL 

(R2) 

4 CPUERR 
TN 


A73,STESTN 


v8. ~(SP) 


#255 ,$FATAL 
(R2) 


SP ,ABUF F =4 
TST/4 

#256, $FATAL 
(R2) 


| : SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
H AROUND CLEAR AND HALT IF CLE 
“MOVE 5 PECIAL POWER MONITOR FATAL # TO SFATAL 
;SET MSGTYP TO FATAL ERROR 
; OWER F OUND 


; UPDATE NUMBER 
; SEQUENCE ERROR? 
;BRANCH TC ERROR HALT ON SEQ ERROR 


:PUSH T BIT 
:PUSH P 


;PUSH PC 
sSET T BIT 
: TRAP HER 


REKKEKKRE Reeeeee 


Ox # 255 


:TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 757 


REE 


sMOVE TO MAILBOX # ‘**eex«e 256 
:SET MSGTYP TO FATAL ERROR 

: STACK POINTER WAS NOT PUSHED BY TRAP,OR WRONG STESTN 
;TO SCOPE REPLACE HALT WITH 240 


[AND REPLACE NEXT INST WITH 747 


ee 


C 15 


ae —_——— = 


| 
CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 81 
TEST #74 = TEST FOR PROPER PC ON STACK 


SEQUENCE 94 


1159 _SBITL TEST #74 - TEST FOR PROPER PC ON STACK 
2 EAEEEAAAEAEAAAAKEAAAEKEATCEEEAEEAAEAARAARAEEERAARAERAEARAKRAAREARAERARAAREARERAEERE 
“TEST 74 - TEST FOR PROPER PC ON STACK 
REE EAAEEAAAEEAEEEEEEATAAAEEAEEEEEEARAREKREAAERARARAREAAAEAAEAEHEEEEERE 
014744 032737 000001 177766 TST74: BIT #1. CPUERR iSEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
014752 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
014754 012737 000177 000302 MOV #177, $FATAL ‘MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
014762 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
014764 900000 HALT :CPU POWER BIT FOUND SET 
014766 042737 000001 177766 BIC 4 CPUERR “CLEAR THE BIT FOUND SET 
014774 005237 000304 100$: INC T “UPDATE TEST 
015000 022737 000074 000304 CMP a7k STESTN > SEQUENCE ERROR? 
015006 001016 BNE Ist 173 5-1 =BRANCH TO ERROR HALT ON SFO ERROR 
1160 015010 012706 000500 MOV ee 
1161 015014 012737 015056 000014 MOV #OS_ RTRAPG 
1162 015022 012746 000020 MOV #20,-(SP) :PUSH T BIT 
116 015026 12746 015034 MOV #1$,-(SP) *PUSH PC 
1164 015032 000002 RTI “SET T BIT 
1165 015034 022737 015034 000474 1$: CMP #1$.BUFF-4 “TRAP HERE - SEE IF PC IS CORRECT 
1166 015042 001405 BEQ TST? 
015044 012737 000257 000302 MOV #257,$FATAL :MOVE TO MAILBOX # «xxxxe 257 xxeenes 
015052 095212 INC (R2) “SET MSGTYP TO FATAL ERROR 
015054 000000 HALT “CORRECT PC WAS NOT SAVED ON STACK,CR WRONG $TESTN 
>TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 754 
1167 015056 2$: 


ee em ae eee 


CKKABDO 11/44 TRAPS MACRO M1113 _ 11-Nov-81 10:05 PAGE 82 SEQUENCE 
TEST #75 - TEST THAT RTT POPS T- 6 
1168 _SBITL TEST #75 - TEST THAT RTT POPS T- BIT 
ERE EEE EEE RE EERE EAEAEREARE ES 
“TEST 75 - TEST THAT RTT POPS T= BIT 
EEA EAEKAAEEAAEEEAEEEEEAAAAEEEKRKEEREAREARARAARAARAEAAREAEEEEAARAAAAERAEEEEEE 
015056 032737 000001 177766 TST75: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
015064 001410 BEQ 3 “BRANCH AR CLEAR AND HALT IF CLEAR 
015066 012737 000177 000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
015074 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
015076 000000 HALT U POWER BIT F E 
015100 042737 000001 177766 BIC #1, CPUERR EAR THE BIT FOUND SET 
015106 005237 000304 100$: INC $TESTN “UPDATE TE 
015112 022737 000075 000304 CMP 475 STESTN “SEQUENCE ERROR? 
015120 001015 BNE ST?6=1 =BRANCH TO ERROR HALT ON SEQ ERROR 
1169 015122 012706 000500 MOV yeUFF., $6 
1170 015126 005001 CLR R1 :CLEAR R1 
1171 015130 012746 000020 MOV #20,-(SP) 
1172 015134 012746 015150 MOV #1$,-(SP) 
1173 015140 012737 015166 000014 MOV #2$,14 
1174 015146 000006 RTT 
1175 015150 000240 1$: NOP 
1176 015152 001405 BEQ TST76 
015154 012737 000260 000302 MOV #260, $FATAL :MOVE TO MAILBOX # ‘*eeeeee 260 ceneene 
015162 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
015164 000000 HALT :T=-BIT DID NOT TRAP,OR WRONG $TESTN 
*TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 755 
1177 015166 2$: 


95 


1178 
015166 
015174 
015176 
015204 
015206 
015210 
01521 
015 
015 
1179 O12S3¢ 
1180 015236 
1181 O128¢¢ 
Ate 015246 
1183 015252 
1184 015260 
1185 015262 
1186 015264 
1187 015266 
1188 015270 
1189 015272 
015300 
015302 
1190 015304 
1191 015306 
LB 015310 
1193 015312 
015314 
015322 
015324 


1194 015326 


“cxeappg 11/44 TRAPS 
TEST #76 = TEST THAT RTT ALLOWS ONE INST. BEFORE T 


gee lt 
OW 
Win 
NYNEN 
Wow 
NNON 


S 
S 


Sooo ——— [ONS r 
AAS AMM NAN 


000000 


MACRO M1113 


000001 
000177 
000001 
000304 
000076 
177777 
000500 
000020 
015264 
015304 


000261 


000262 


177766 
000302 


177766 
000304 


000014 


000302 


000302 


eo eee 


A 


E 15 


11-NOV-81 10: Toag PAGE 83 


SEQUENCE 


-SBTTL TEST #76 - TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 


SERRA AAEAEE AAA EAAE AEE AEA AEERARERAEEAAEAERAERAREAERAAAEERAERERAAEER EEE 


:TEST 76 - TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 


PPT TT TTT TTT TITTLE LLL LLL LI LLL LLL LLL 


TST76: 


100$: 


1$: 


2$: 


3$: 


4$: 


at 


#1,CPUERR 
100$ 

#177, SFATAL 
(R2) 


#1, CPUERR 
TESTN 

#76, $TESTN 

TST?7=1 

#177777 R5 

#BUFF ,SP 


R1 


#262, $FATAL 
(R2) 


: SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
; BRANCH oe? 


CLEAR AND HALT IF CLE 
:MOVE SP POWER gy ly FATAL # TO SFATAL 


E 
+ SET MSGTYP. TO FATAL E 
OWE F OUND 


A 
® SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


:CLEAR RO 
:SET T-BIT 


;DO0 THIS TEST NO MORE THAN 2 TIME 
SMOVE TO MAILBOX # *aeexe 261 
:SET MSGTYP TO FATAL ERROR 


:DID NOT TRAP 

:TO SCOPE REPLACE HALT WITH 240 

ZAND REPLACE NEXT INST WITH 752 

;SEE IF RTT ALLOWS 1 INST. 

;D0 THIS TEST NO MORE THAN TWO TIMES 


: MOVE TO MAILBOX # yon ny 262 


oo 


REeaeee 


“RTT DI T AL NST.,OR WRONG STESTN 
;TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 741 


96 


————————————— 


F 15 


| 
(kk KABDO 11/44 TRAPS MACRO M1113 11-Nov-81 710: 0S PAGE 84 SEQUENCE 
TEST #77 - Test THAT RTI DOES NOT ALLOW 1 
| 1195 _SBTTL TEST #77 - TEST THAT RTI DOES NOT ALLOW 1 INST. 
| 2 SAEEAEAAAEAEARAAAEAAEKRAEAEAAAAAKEEAERARAAERARARAARERARARARAAAAAAREAARAERARAAAEAEEE 
| “TEST 77 - TEST THAT RTI DOES NOT ALLOW 1 INST. 
tr = gga eee yo eel Ng Ne at ee tet gt a ge: te i 
0153 6 032737 000001 177766 TST77: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
015 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLE 
015336 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
015344 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
015346 900000 HALT =CPU POWER BIT FOUND SET 
015350 042 1 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
015356 00 237 000304 100$: INC STESIN ‘UPDATE TEST NUMBER 
015 022737 000077 000304 CMP “7? STESTN * SEQUENCE ERROR? 
015 1023 BNE STi00-12 sBRANCH TO ERROR HALT ON SEQ ERROR 
1196 015372 012706 000500 MOV ES st 
1197 015376 012746 000020 MOV #20,-(SP) 
1198 015402 012746 015420 MOV #1$,-(SP) 
1199 015406 012737 015434 000014 MOV #2$,14 
1200 015414 005001 CLR R1 
1201 13416 000002 RTI :SET T-BIT 
1208 015420 005201 1$: INC R1 “RTI SHOULD NOT ALLOW THIS 
120 019422 012737 000263 000302 MOV #263, $FATAL “MOVE TO MAILBOX # ‘**eneee 263 exeenee 
015430 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
015432 000000 HALT *T= BIT DID NOT CAUSE TRAP 
=TO SCOPE REPLACE HALT WITH 240 
*AND REPLACE NEXT INST WITH 756 
1204 015434 005701 2$: TST R1 
1205 :RTI SHOULD NOT ALLOW 1 INST. BEFORE TRAP 
1206 015436 001405 BEQ TST100 
015440 012737 000264 900302 MOV #264, $F ATAL :MOVE TO MAILBOX # teeexee 264 sexener 
015446 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
015450 000000 HALT “RTI DID ALLOW 1 INST. BEFORE TRAP,OR WRONG $TESTN 


Hh SCOPE REPLACE HALT WITH 240 


97 
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1207 
015452 
015460 
015462 
015470 
015472 
015474 
015502 
015506 
015514 
015516 
015522 
1208 015522 
1209 015526 
1210 015534 
1211 015540 
015546 
015550 
1212 015552 
1213 015560 
013286 
015570 
015572 
1214 015574 
1215 015600 
1216 015606 
1217 015610 
015610 
015616 
015620 
1218 015622 
1219 015630 
015632 
015640 
015642 
1220 015644 
$$) 015650 
1222 812028 
1225 Beene 
013670 
1224 015672 
1225 015700 
015702 


- CKRABDO 11/44 TRAPS 
TEST #100 - DOES THE PROCESSOR TRAP WHEN R7 IS 0 


SSNsF 223s 
“MIUNIOVUMY—=PO 
RNNNN SSNRNONRNSRN 
WW 
rmNON 


—"NOWS WOWW 
VNNNO NMkNNN 


oOooe°o 
o-—= = 
WVrungngn 


MACRO M1113 


000001 
000177 


000001 
000304 
000100 
015762 
000500 


0000061 
000266 


000500 
015622 


000267 


015611 
000270 


000500 
015672 


000271 


015657 
000272 


177766 
000302 


177766 
000304 


000004 
000302 


000474 
000302 


000004 


000302 


000474 
000302 


000004 
000302 


000474 
000302 


A A AE CE LO LLL LE 


11-NOV-81 ies - PAGE 85 


SEQUENCE 98 


-SBTTL TEST #100 - DOES THE PROCESSOR TRAP WHEN R7 IS ODD? 


SERA AAAEEEAAAAAEAAEAEEEE EERE AE AREER AREAERERARRARARAAAARAAERE RARER E EERE RARE 


:TEST 100 - DOES THE PROCESSOR TRAP WHEN R7 IS ODD? 


PPT T TT OTT TTT TE TITTLE LLL LULL LLL LLL LLL LLL 


TST100: BIT 
BEQ 


100$: 


1000$: 


1$: 


2$: 


3$: 


4$: 


5$: 
6$: 


7$: 


HALT 





f CPUERR 
#177, SFATAL 
(R2) 


#1, “oe 
#100, STESTN 
TST101-12 
rt Ae 


#1,R7 
#265, $FATAL 
(R2) 


#1 ,BUFF-4 
#266, $F ATAL 
(R2) 


#BUFF ,R6 
#4$,4 


#267, $F ATAL 
(R2) 


#3$+1 ,BUFF-4 


#270,$FATAL 
(R2) 


#BUFF ,R6 
#7$,4 


R7 
#271, $FATAL 
(R2) 


#6$+1 ,BUFF~4 


#272, $F ATAL 


‘SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CLEAR AND HALT IF CLE 
OWER yy FATAL # TO SFATAL 


; UPDA 
SEQUENCE E 
: BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


;SET UP STACK POINTER 
; FROM TRAP 


;RETURN T 

:PC EQUAL E 

sMOVE TO MAILBOX # ‘*«*eeeK% 265 saetnee 
SET MSGTYP TO FATAL ERROR 


; AD HA 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 763 


2£eaaaune 


sMOVE TO MAILBOX # ‘*«*e2xa%% 266 
:SET MSGTYP TO FATAL ERROR 
* CORRECT PC WAS NOT SAVED ON STACK 
-TO SCOPE REPLACE HALT WITH 240 

: AND REPLACE NEXT INST WITH 752 
:STACK POINTER 


PC BECOMES ODD 


sMOVE TO MAILBOX # *eee"% ©6267 
;SET MSGTYP TO FATAL ERROR 


‘TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 737 


ERE 


eeeEeaee 


MOVE TO MAILBOX # sxeeeee §270 


:TO 
:AND REPLACE NEXT INST WITH 726 


;MAKE PC ODD 
SMOVE TO MAILBOX # *eeeexe 271 
:SET MSGTYP TO FATAL ERROR 

LD TRAP 


: SHOU 
:T0 SCOPE REPLACE HALT WITH 24 

AND REPLACE NEXT INST WITH 71 
® CHECK VALUE OF PC ON STACK 


sMOVE TO MAILBOX # 


2£aeeeee 


akeeakee 272 xeeenree 


————— ee inne 


[oo ee 


tetiiet 

NO 

olen le lel el elo] a) 
abut bebabababeaD 
WAAAY" 
SNNNN NN 
yo me 
Nm or 


— 23 = od =) 


yN NC 


MNUN™N 


000004 


000302 


000004 
000474 


000302 
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10:05 PAGE 85-1 SEQUENCE 
ODD? 


(R2) ;SET MSGTYP TO eh ERROR 
; WR ALUE ON 


ONG V ACK 
:TO SCOPE REPLACE MALT WITH 240 
ZAND REPLACE NEXT INST WITH 702 


wOUFF LR6 
=CARRY EQUALS A 1 
R7 “PC EXCOMES ODD 
#273. $FATAL sMOVE TO MAILBOX # *eeanee 273 xeenene 
(R2) :SET MSGTYP TO FATAL ERROR 
‘ODD ADDRESS DIDN'T TRAP 
:TO SCOPE REP HALT WITH 240 


LACE 
SAND REPLACE NEXT INST WITH 666 
T UP A HALT FOR TRAP 
ocde98e1>. BUFF-4°:CHECK FOR VALUE ON STACK 


TST1 
#274, $F ATAL sMOVE TO MAILBOX # *teaeee 274 xtnnnne 
(R2) ;SET MSGTYP TO FATAL ERROR 

:WRONG VALUE ON STACK,OR WRONG $TSTNM 

:TO SCOPE REPLACE HALT WITH 240 

;AND REPLACE NEXT INST WITH 652 


1 15 


| CRRABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 86 SEQUENCE 
TEST #101 = TEST THAT TRACE BIT TRAPS INHIB ON TFAP INST 
1236 _SBTTL TEST #101 - TEST THAT TRACE BIT TRAPS INHIB ON TRAP INST 


SRAAAAAAAAAAARAEAAAARAAAAAAAAERAAERAAAAAAEARAARAAEARARAERAAAAAERARAERAEEAEREAAERES 


:TEST 101 = TEST THAT TRACE BIT TRAPS INHIB ON TRAP INST 


PPPTTT PTT TT TTT TIT T ITT TILT LI LLL LLL LLL LLL LIL LLL LLL 


5774 032737 000001 177766 1ST101: BIT #1,CPUERR : SEE IF BIT 0 OF CPUERR (POWER te Bee BIT) IS SET 
6002 pee BEQ 100$ CH AROUND CLEAR AND HALT IF CLEAR 
6004 012737 000177 000302 MOV #177 ,SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


005212 INC (R2) sSET MSGTYP TO FATAL ERROR 
POWER BIT FOUND SET 


042737 000001 177766 BIC #1. CPUERR “CLEAR THE BIT FOUND SET 
100$: INC $TESTN ‘UPDATE TEST NUMBER 

37 000101 000304 CMP #101, $TESTN > SEQUENCE ERROR? 

27 BNE 3$ “BRANCH TO ERROR HALT ON SEQ ERROR 

000500 MOV HBUFF .R6 

016102 000014 MOV #is.14 : TRACE TRAP 


0 
7 
7 000022 CLR #22 
; 


_—— 
ero 
=x 
> 
= 
~“ 

Se 


Saeeee 
oN 
: 


w 
wi 


Baus 
Se 
PePEeeS 
ISS 2288 


ole lejeojl aloo lolol olelolalelelelelolelelala) 


130 000020 MOV #4$,20 :IOT TRAP 
46 sper MOV #20,-(SP) PUSH a 


— —3 —3 


MOV #1$,-(SP) :PUSH P 


= 


3 


; TRAP, NEW CC HAVE TRACE RESET 
000302 MOV ,-* aiaa MOVE TO MAILBOX # seeexee 275 xaeeene 


| 
| 
INC ERROR 
000000 HALT TRACE TRAP WAS NOT INHIBITED 
;TO SCOPE REPLACE HALT WITH 240 


RoMoNofonofononony 
oa ee x ~ 


eel ee ee? dd ee 
wn © 


] 
= 
NM 
™N 
Ww 
™N 
©S 
o 
© 
N 
™/ 
Ww 


cc ce ee ee ce ee ee ee ee ed ed eed eed ed 

oO 

RNS 

S 33 

ne 23 
ont 
w 
oo 
oO 
~ 


AAA 
_— oe oO et 


— 2 E> 
ns 
5 
Nm 
ad 
z 
Se 
wo: 
mn 
“4 
a 
a) 
~ 
a 
v 
—f" 
© 
mn 
P=) 
“ 
> 


35 :AND REPLACE NEXT INST WITH 750 


000276 000302 MOV #276, $F ATAL sMOVE TO MAILBOX # ‘seannee 276 «teens 
005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
;WRONG TSTNM,OR WRONG $TSTNM 
:T0 SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 743 


ALAO 
a) 
—_ 
Nm 
™N 
Ww 
™N 


130 012737 000016 000014 4$: MOV #16,14 
136 012737 000022 000020 MOV #22,20 


ee nee ae eee —_— - 


eee eee ee 


CKKABDO 11/44 TRAPS 


TEST #102 = TEST THAT THE TRACE 


1248 


ed od ed dd 
PIPIMINIPNONoN 


le eed ed ed ed wd 
ous 
te tes 


RRR 
VAVERORORAE 


AXAAAO 

MMMM 
no 
ao 


ole elelo)l alalel~leleleleleleleleleloleales 
oo 


RT ee ee ee ee ee ee ee ee ee ee ee 


ano 
Mr 
Quin 
oo 





Seta tve 
WIN Po 
NEN 


: 


So ==ONS 
MPN =r viltp 


012746 
012746 


012737 


MACRO M 


000001 
000177 


0 
016240 
000476 


000277 


000016 


~- 


——————— LL 


J 15 


M1113 11-NOV-81 10:05 PAGE 87 SEQUENCE 
BIT IS SAVED IN THE STACK 
.SBTTL TEST #102 - TEST THAT THE TRACE BIT IS SAVED IN THE STACK 
FEAR AAAAAERAAAAEEAAEAAAEAARERAREEAAEREREAEAEREEARARAERAAAERERAAAAE RE EEEE 
*TEST 102 - TEST THAT THE TRACE BIT IS SAVED IN THE STACK 
PPPS TOPS T TTT OTT TIT TITTLE TIT LITTTTTLI LL LLLi Li TLLLLt ii 
177766 TST102: BIT #1, CPUERR :SEE IF BIT O OF CPUERR (POWER moms Ton BIT) IS SET 
BEQ 100$ = BRANCH AROUND CLEAR AND HALT IF CLEAR 
000302 MOV #177, $F ATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
INC (R2) SET MSGTYP TO FATAL ERROR 
HALT :CPU POWER BIT FOUND SET 
177766 BIC #1,CPUERR :CLEAR THE BIT FOUND SET 
100$: INC STESTN : UPDATE TEST NUMBER 
000304 CMP #102,$TESTN oe ERROR? 
BNE 2$ ;BRANCH TO ERROR HALT ON SEQ ERROR 
MOV #BUFF .R6 :SET UP STACK POINTER 
000014 pot > sada : TRACE TRAP RETURN 
MOV #20,~(SP) :SET THE T BIT 
ay #1$,-(SP) 
000020 1$: BIT BUFF -2,4#20 :CHECK FOR T BIT ON STACK 
3s BNE 3$ 
000302 MOV #277 ,$FATAL :MOVE TO MAILBOX # ‘*%eeea% 277 teannee 
INC (R2) ad MSGTYP TO FATAL ERROR 
HALT T BIT NOT SAVED ON THE STACK, OR WRONG STSTNM 
-TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 752 
000014 3$: MOV #16,14 


;THIS ROUTINE TEST THAT NO LEGAL ADDRESS TRAPS. 
sAND THAT AN ILLEGAL ADDRESS TRAPS TO LOCATION 4 


eee ee ee eS ee 


101 


— eee — ———— 


— ee eee oe 


Ls coepomeesms-eenasimesbantvenabeesinsorentvienetseiptcinnnnnsioastnunesneasstsmsiies 
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ec ee el ed eed eed ceed eed 
ee cones 

OLNLONO 


o 
WG 


DUAR 


olelejleolelelejeaj ole ej eo) aja) a) 


eh ed es es sd) 4 
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AAOAAAOCAAOO 
SAS 
Oofoeflnvo 


me ee a dd dd 2 ed ed 

MMNMINVINMNVINNVNNNT 
3 SN 
Mm 


SN NNN SO 
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FRFEEF 
Brot 


ke ed ed ed ed ed ed od ed 
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RAR OGO~ 
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FEES FREEEF SEES 
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ee ee eed od ed 
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Oooo°co 
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CKKABDO 11/44 TRAPS 
TEST #103 = TEST NON-EXISTENT ADDRESS TRAPS 


seers 
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—— ee ee ee 


MACRO M1113 


000103 
016700 


177766 


000500 
160000 


000300 


000040 
000301 


000020 
000302 


177766 
000302 


177766 
000304 


000004 


000302 


000502 
000502 


000502 
000302 


000502 
000302 


K 15 
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SEQUENCE 


-SBTTL TEST #103 - TEST NON-EXISTEN” ADDRESS TRAPS 


SRAAAAAAEAAEAA EAE RA EEAEAARAAEAAERARRARAAEARAEREAEAERRERRARAERAE AERA EERE ED 


:TEST 103 - TEST NON-EXISTENT ADDRESS TRAPS 


OTT TTTTT ITIL LTE LEE LILLE LLLELLLLLLL LLL 


TST103: 


100$: 


1000$: 


BIT 
BEQ 
HALT 
B 

INC 
CMP 
BEQ 
JMP 


* ‘tone 
#177, $FATAL 
(R2) 
#1,CPUERR 
TESTN 
#103,$TESTN 
1000$ 
18$ 


; SEE IF BIT 0 OF CPUERR — MONITOR BIT) IS SET 
CH AROUND CLEAR R 


AND HALT IF CLEA 
“MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 


;SET MSGTYP TO FATAL ERROR 
F OUND 


: UPDAT 
: SEQUENCE ERROR? 


;BRANCH OVER ERROR HALT ON SEQ ERROR JUMP IF OK 
; JUMP TO ERROR HALT ON SEQ ERROR 


; THIS = rests MEMORY UNTIL IT DOES A NXM TRAP 


7$: 


8$: 


9$: 


> RETURN 
MOV 


RO 
CPUERR 
6 


#834 
#BUFF SP 


(RO) + 
RO.4160000 
6$ 


#300, SFATAL 
(R2) 


~~ ADDRESS TRAP 


CPUERR,RCPUER 
#CERMSK .RCPUER 


RO, #160000 
9$ 
SaeenCrute 


4301, SFATAL 
(R2) 


10$ 
#20,RCPUER 
#302, $F ATAL 
(R2) 


; SET -_NON EXIS 


;CLEAR CPU ERROR REGISTER 


;SET UP ADDRESS TRAP ENTRANCE 


:I1F OUTSIDE OF CORE, TRAP TO 4 
:IS POINTER IN SIDE CORE 
;TEST THE REST OF CORE 


:MOVE TO MAILBOX # ‘*xexxn% 300 
SET + TO FATAL ERROR 


: SHOULD HAVE TRAPPED 
;TO SCOPE REPLACE HALT WITH 240 
[AND REPLACE NEXT INST WITH 751 


re THE FIRST NXM LOCAVION IN 5$ 
AVE CPU ERROR REGISTER 


EaREEKKE 


MASK OFF UNUSED ERROR REG BITS 


:WHICH CPU ERROR REG BIT SHOULD BE 

aa calt 4) (BIT 5) 

; BRANCH TIMEOUT BIT _ BE SET 
31S NON-EXISTANT MEMORY BIT SET? 


sMOVE TO MAILBOX # *xaexee 501 
:SET MSGTYP TO FATAL ERROR 

; INCORRECT CPU ERROR REG CONTENTS 
;TO SCOPE REPLACE HALT WITH 240 

:AND REPLACE NEXT INST WITH 725 


;1S UNIBUS TIMEOUT BIT SET? 


:MOVE TC MAILBOX # teexeee = 302 
;SET MSGTYP TO FATAL E 


Reeeaenre 


eeeaeee 


eee ee ee | ree 


102 


ABDO 11/44 TRAPS 
T #103 = TEST NON-EXISTENT ADDRESS TRAPS 
1290 
1291 016510 012700 160001 
1292 016514 005037 177766 
1293 016520 HEEL 016560 
1294 016526 012706 000500 
1295 016532 105740 
1296 016534 005200 
1297 016536 020037 016344 
1298 016542 001463 
016544 012737 000303 
016552 005212 
016554 000000 
1299 
1300 
1501 
158 016556 000455 
1304 016560 005737 177776 
1305 016564 001405 
016566 012737 000304 
016574 005212 
016576 000000 
1306 
1307 016600 013737 177766 
1308 016606 042737 177413 
1309 016614 020027 160000 
1310 
1311 
1312 016620 103012 
13135 016622 022737 000040 
1314 016630 001417 
016632 012737 000305 
016640 005212 
016642 000000 
1315 016644 000411 
1316 016646 022737 000020 
1317 016654 001405 
016656 012737 000306 
016664 005212 
016666 000000 
1318 016670 023727 000474 
1319 016676 001706 
016700 
016700 012737 000307 
016706 005212 
016710 000000 
1320 016712 012737 000006 


MACRO M1113 


000004 


000302 


000302 


000502 
000502 


000502 
000302 


000502 
000302 


016534 


000302 


000004 


10S: 00 

11$: CLR UERR 
MOV 14$,4 
MOV #BUFF SP 
TSTB =—s_- = (RO) 

13$: INC RO 
CMP RO.4$ 
BEQ 19$ 
MOV #303, SFATAL 
INC (R2) 
HALT 
BR 19$ 

14$: TST STATUS 
BEQ 15$ 
MOV #304, $FATAL 
INC (R2) 
HALT 

15$: MOV CPUERR,RCPUER 
BIC #CERMSK .RCPUER 
CMP RO, #160000 
BHIS  16$ 
CMP #40. RCPUER 
BEQ 17$ 
MOV #305, SFATAL 
INC (R2) 
HALT 
BR 17$ 

16$: CMP #20,RCPUER 
MOV #306, SFATAL 
INC (R2) 
HALT 

17$: CMP BUFF-4,#13$ 
BEQ 11$ 

18$: 
MOV #307, $FATAL 
INC (R2) 
HALT 

19$: MOV #6,4 


11-NOV-81 10:05 PAGE 88-1 


L 15 


;SET MSGTYP TO ey E 


:MOVE TO MAILBOX # a 305 


SEQUENCE 


;THIS ROUTINE DOES NXM TRAPS UNTIL " FINDS AN EXISTANT ace LOCATION 
MOV #160001 ,RO :SET TION 


UP THE HIGHEST MEM LOCA 
:CLEAR CPU ERROR pense ER 
:SET UP THE VECTO 


sDOES IT EXIST? 
:IF YES INCREMENT IT 
:I1S IT THE SAME LOCATION? 


aaaazar 3035 eeeenne 


sMOVE TO MAILBOX # 
RROR 
D 5$ SHOULD HAVE BEEN EQUAL 
ITH 240 


; OMP FA 
:THAT SOME LEGAL ADDRESS TRAPPED OR 


: THAT AN ILLEGAL ADDRESS DID NOT TRAP 


teekaae 304 «xeennne 


sMOVE TO MAILBOX # 


:SET MSGTYP TO FATAL ERROR 


“AND REPLACE NEXT INST WITH 657 
; SAVE CPU ERROR REGISTER 


;MASK OFF UNUSED ERROR REG BITS 
sWHICH CPU ERROR yt “he 


SHOULD BE 
SET sane EXISTANT MEMORY (BIT 5) 


(BIT 4) 
; BRANCH UN TIMEOUT BIT SHOULD BE SET 
:1S NON-EXISTENT MEMORY BIT SET? 


EEE 


:SET MSGTYP TO FATAL E 

: INCORRECT CPU ERROR REG CONTENTS 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 635 


31S UNIBUS TIMEOUT BIT SET? 


Reker 


sMOVE TO MAILBOX # *exxexe 306 
:SET MSGTYP TO FATAL E 

; INCORRECT CPU ERROR REG a ie 
;TO SCOPE REPLACE HALT WITH 240 

SAND REPLACE NEXT INST WITH 623 


eeeageee 


sMOVE TO MAILBOX # txxaxe 307 
;SET MSGTYP TO FATAL ERROR 

:OLD PC WAS NOT SAVED OR WRONG STESTN 
TO SCOPE REPLACE HALT WITH 240 

:AND REPLACE NEXT INST WITH 612 


Ee -- 


103 


M15 


CKKABDO 11/44 TRAPS MACRO M1113 Le. oa 10:05 PAGE 88-2 SEQUENCE 104 
TEST #103 = TEST NON-EXISTENT ADDRESS T 

1321 016720 005037 000006 CLR 6 

! ‘ THIS ROUTINE WILL FIGURE OUT IF YOU HAVE A DL11W 

1324 016724 0930 7 016750 CLR PROF TE ; INITIALLY CLEAR THE LOCATION 
1325 0167 01 0005 MOV #BUFF ,SP >SET UP i. STACK POINTER 

1 $ 167 0127 fs 000004 MOV #DL11W,4 :SET UP THE T VECTOR 

1327 016742 005737 177564 TST TPS ;TEST THE PUNCH STATUS REGISTER 
1328 016746 000403 BR DL11W1 ;BRANCH IF IT EXISTS 

1329 016750 PROF TE: . WORD 

1330 016752 0036 7 016750 DL11W: INC PROF TE ; INCREMENT IF NO DL11W 

1331 016756 012737 000006 000004 DL 111: MOV #6,4 


1332 


wi 

lw 
ss3ssa35 
BAAVISLS 


OUR AE 
olelelelelelejlelolalalelelelelelelel ales) 


ee ce ce ee ee ee ee ed eed ed eed eed dd ed 
ER 
MAO 
esossooeesssscs 


Sw 

Oo 

Ww 
OuUNPoUVUIPsNo NPP 


+3 


et ot od od I I 
WANANAN 

~N 

. 


KER 
Noo 


NNN™N 
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&S 


— 
© 


oOoC°Co°o 
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~NNN™N 
— 2 St 
mn-— 
MmMOoOnrmrn 


moos 
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TEST #104 = TEST THAT A 


S 
uw Soh NEN 
NNN 


== MOVIN 
WWW 
NNN 


NV 


SVNSUUuUS 
—WWWNAIANWN © 
ON NNO 
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N 15 
11-NOV-81 10:05 PAGE 89 


TTY INRUP CAUSES AN OVERFLOW TRAP 
-SBTTL TEST #104 - TEST THAT A TTY INRUP CAUSES AN OVERFLOW TRAP 


REE ARAEAEEAERAEAEAEAERAAAEAEEAAEAAAAAEAAAAAAAAAAAAAARAAAERAAREAAH KARATE 


“TEST 104 - TEST THAT A TTY INRUP CAUSES AN OVERFLOW TRAP 


ERATE AAAEKAAEEAAAAAAAERERAEAAEAAAEEE 


000001 
000177 


000001 
000304 
000104 
016750 


000310 


000311 


177564 
000006 
000006 


177766 
000302 


177766 
000304 


177776 
000004 
000064 
177564 


000302 


000302 


000004 


TST104: BIT 


100$: INC 


1$: 


2$: CLR 


3$: 


eee ee ere a 


#1, CPUERR 
100$ 

#177, $FATAL 
(R2) 


#1,CPUERR 
STESTN 
atin 
PROF TE 

3$ 

#340, STATUS 
#400,R6 


#1$.64 
#100, TTCSR 
STATUS 
#310, $FATAL 
(R2) 


#311,$FATAL 
(R2) 


EN 


SEQUENCE 


+SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
CH AROUND CLEAR AND HALT IF CLEAR 

“MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 

2 SET MSGTYP TO FATAL ERROR 
OWER FOUND SET 


OR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


;LOCK OUT INTERRUPT 
:SET UP oe TO — 
>SET UP TRAP 


seeker 310 centare 


sMOVE TO MAILBOX 

:SET MSGTYP TO FATAL ERROR 

:NO INTERRUPT OCCURRED 

;TO SCOPE REPLACE HALT WITH 240 
sAND REPLACE NEXT INST WITH 746 


sMOVE TO MAILBOX # ‘**xeee% 377 
:SET MSGTYP TO FATAL ERROR 
OVERFLOW TRAP DID NOT OCCUR OR WRONG STSTNM 
Hh SCOPE REPLACE HALT WITH 240 

REPLACE NEXT INST WITH 741 
‘CLEAR INTERRUPT ENABLE 


Zeaenee 


ee 


105 


fer 


B 16 


CKK 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 90 SEQUENCE 
TEST #105 - TEST THAT A TRAP OCCURS BEFORE INRUPT 
1348 -SBTTL TEST #105 - TEST THAT A TRAP OCCURS BEFORE INRUPT 


fs RRA AAAAAAAAAEAAAEAAAE RAAT AEA AAAARAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARAAAAAAEES 


:TEST 105 - TEST THAT A TRAP OCCURS BEFORE INRUPT 


PAAR ESASASZALALALAS ALARA ASALARAR ARES ARRAS ARRAS RR RRARAR RRR RARRR ARAL ADS DS SO | 


017142 032737 000001 177766 TST105S: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
01715 901410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
1715 1273 000177 000302 MOV #177, $F ATAL ;MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
17160 00521 INC (R2) “SET MSGTYP TO FATAL ERROR 
017162 HALT =CPU POWER BIT FOUND SET 
017164 0427 000001 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
017172 2 7 000304 100$: INC STESTN ‘UPDATE TEST NUMBER 
017176 022737 000105 000304 CMP #105, $TESTN = SEQUENCE ERROR? 
017204 001037 BNE 2$ “BRANCH TO ERROR HALT ON SEQ ERROR 
1349 017 005737 016750 TST PROF TE 
1350 017212 001046 BNE 4$ 
1351 017214 01 706 000500 MOV #BUFF ,R6 
1 3 17220 012737 000340 177776 MOV #340,STATUS :SET TO A HIGH PRIORITY LEVEL 
1353 017226 012737 017272 000064 MOV 4 
1354 017 012737 000100 177564 MOV #100. TTCSR : INTERRUPT FOR TTY PUNCH/PRINTER 
1355 017 42 012737 017316 000034 MOV #3$,34 = TRAP VECTOR 
1 56 1725 O27 7 017304 000064 MOV #2$.64 “TTY VECTOR 
1357 017256 12737 000340 000036 MOV #340, 36 ‘IF TRAP TRAPS, MOVE 340 TO PRIORITY 
1358 017 64 005037 177776 CLR STATUS “SHOULD INTERRUPT AT END OF CLR INST 
1359 017270 104400 se TRAP ‘TTY INTERRUPT SHOULD OVERRIDE TRAP 
017272 012737 000312 000302 MOV #312, SFATAL sMOVE TO MAILBOX #& «keene 312 xennnne 
017300 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
017302 000000 HALT “NEITHER TRAP NOR INRUPT OCCURED 
-TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 740 
1361 017304 2$: 
017304 012737 000313 000302 MOV #313, $FATAL sMOVE TO MAILBOX # teeenee 313 eeennee 
017312 005212 INC (R2) =SET MSGTYP TO FATAL ERROR 
017314 000000 HALT :INRUPT OCCURRED FIRST.OR WRONG STSTNM 
=TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 733 
1362 017316 005037 000036 3$: CLR 36 
136 017322 042737 000100 177564 BIC #100, TTCSR 
1364 017330 4$: 


| C 16 
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CKKABDO 11/44 TRAPS MACRO M1113. 11-NOV-81 10:05 PAGE 91 SEQUENCE 107 
TEST #106 = TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 
1365 .SBTTL TEST #106 - TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 
SEA EEERERAEEEEEEREEAEEEEREAAAEAEREREREARAERARAEAAERAERAEARAEEAERAEATAAEEE 
“TEST 106 - TEST THAT A PENDING INRUP, INRUP BETWEEN TRAPS 
“EEE AAEEEAEAEEEAAEAAEAEAEEEAEAEAREAAAAAAARAERAAKAAERERAAARARARAAAAAREEAAERERARAEEAEARE 
017330 032737 000001 177766 TST106: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONI TOR BIT) IS SET 
173 001410 BEQ 100$ ‘BRANCH AROUND CLEAR AND HALT IF CLE 
017340 012737 000177 000302 MOV #177.$FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
017346 5212 INC (R2) “SET MSGTYP TO FATAL ERROR 
01735 HALT :CPU POWER BIT FOUND SET 
017352 042737 000001 177766 BIC #1, CPUERR [CLEAR THE BIT FOUND SET 
017 52 7 000304 100$: INC STESTN “UPDATE TEST NUMBER 
017364 022737 000106 000304 CMP #106, $TESTN “SEQUENCE ERROR? 
017372 1031 BNE 2$ sBRANCH TO ERROR HALT ON SEQ ERROR 
1366 017374 005737 016750 TST PROF TE 
1367 017400 001046 BNE 4$ 
1368 017402 012706 000500 MOV #BUFF .R6 
1369 017406 012737 000340 177776 MOV #340, STATUS 
1370 017414 012737 000100 177564 MOV #100. TTCSR 
1371 017492 012737 017454 000034 MOV #1$, 34 : TRAP 
1 re 017% 012737 017470 000064 MOV #3$.64 ‘TTY OUTPUT 
1373 017436 012737 017456 000020 MOV #2$.20 : 
1374 017444 012737 000340 000022 MOV #340, 22 :IOT PRIORITY 
1375 017452 104400 TRAP : THE ACT OF TRAPPING LOWER PRIORITY 
1376 017454 000004 I$: 10T s INTERRUPT SHOULD OCCUR IN PLACE OF IOT TRAP 
017456 012737 000314 000302 MOV #314, $FATAL sMOVE TO MAILBOX # txexaee 314 xeenene 
017464 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
017466 000000 HALT “NO INTERRUPT BETWEEN TRAPS.OR WRONG $TSTNM 
:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 741 
1378 017470 005037 000022 3$: CLR 22 “CLR OT PRIORITY 
1379 017474 012737 000036 000034 MOV #36, 34 
1380 017502 012737 000066 000064 MOV #66, 64 
1381 017510 012737 000022 000020 MOV #22,20 
1 eae 017516 4$: 


eee ee Cie 


D 16 
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CKKABDO 11/44 TRAPS MACRO M1113 _11-NOV-81 a 7 PAGE 92 SEQUENCE 108 


TEST #107 = TEST THAT ‘'RESET’* GOES TO OUTSIDE WOR 
1384 -SBTTL TEST #107 - TEST THAT “'RESET’’ GOES TO OUTSIDE WORLD 


SRAAAEAAAEEEA AAA AETAAEKEEEAAAARA AERA AAAEEAARAERARAARARERERAEAAAAEERAAERES 


:TEST 107 - TEST THAT "'RESET’' GOES TO OUTSIDE WORLD 


—MeRASASESAALZALALASASLALAALEAALAAL ELAR REARS A ARERR EAA R RRR RRR RR ARRAS ARR A RAS DSO | 


017516 032737 000001 177766 TST107: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
017524 001410 BEQ 1 “BRANCH AROUND CLEAR AND HALT IF CLE 
017526 012737 000177 000302 MOV #177, $FATAL *MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
017534 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
017536 000000 HALT POWER BIT FOUND SET 
017540 042737 000001 177766 BIC #1, CPUERR :CLEAR THE BIT FOUND SET 
017346 005237 00030 100$: INC STEST :UPDATE TEST NUMBER 
01755 022737 000107 000304 CMP #107 STESTN *SEQUENCE ERROR? 
017560 1087 BNE T119-12 :BRANCH TO ERROR HALT ON SEQ ERROR 
1385 017562 005737 016750 TST 
1386 017566 001031 BNE | 
1387 017570 012737 000100 177564 MOV #100, TTCSR :SET INTERRUPT ENABLE 
1388 017576 012737 000100 177560 MOV #100. TRCSR *SET INTERRUPT ENABLE 
1389 017604 000005 RESET “SHOULD CLEAR INTERRUPT ENABLE 
1390 017606 032737 000100 177564 BIT #100, TTCSR *TEST FOR CLEAR 
1391 017614 001405 BEQ 
017616 012737 000315 000302 MOV #315, SFATAL sMOVE TO MAILBOX # teennee 315 xeennee 
017624 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
017626 000000 HALT ;RESET FAILED TO CLEAR TTCSR 
COPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 754 
1392 017630 032737 000100 177560 1$: BIT #100. TRCSR “TEST FOR CLEAR 
1393 017636 001405 BEQ TST11 
017640 012737 000316 000302 MOV #316, $FATAL :MOVE TO MAILBOX # ‘tkexeee 316 sxeeene 
017646 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
017650 000000 HALT “RESET FAILED TO CLEAR TRCSR,OR WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 743 
1394 017652 2$: 
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CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 93 SEQUENCE 
TEST #110 = TEST THAT RESET HAS NO EFFECT ON TRACE TRAP 
1395 -SBTTL TEST #110 - TEST THAT RESET HAS NO EFFECT ON TRACE TRAP 
SRRRERRE RARE RAR AERA R AEA TAA ATTRA TARTRATE AAR ee eee eee eAAeeeeeeeeeee 
;TEST 110 - TEST THAT RESET HAS NO EFFECT ON TRACE TRAP 
PITTI TIT IIT TITTLE LLL LLL tii tii iii iii iii iii. 
017652 032737 000001 177766 1ST110: BIT #1,CPUERR ;SEE IF BIT 0 OF CPUERR —_— MONITOR BIT) IS SET 
017660 001410 BEQ 100$ ; CH AROUND CLEAR AND HALT IF CLE 
017 ELE LA 000177 000302 MOV #177, $FATAL sMOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
017670 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
017672 veges HALT ; POWER BIT FOUND SET 
017674 0427 000001 177766 BIC #1, CPUERR ;CLEAR THE BIT FOUND SET 
017702 005237 000304 100$: INC STESTN ;UPDATE TEST NUMBE 
017706 022737 000110 000304 CMP #110, $TESIN ; SEQUENCE ERROR? 
017714 1014 BNE 2$ ;BRANCH TO ERROR HALT ON SEQ ERROR 
1396 017716 012706 000500 MOV #BUFF ,R6 :SET STA 
1397 017722 piste 017760 000014 MOV #3$,14 :SET UP TRACE VECT 
1398 0177 012746 000020 MOV #20,-(R6) :SET THE T-BIT ON STACK 
1399 0177 012746 017742 MOV #1$,-(R6) sMOVE NEW PC ON STACK 
1400 017740 000006 RTT 
1401 017742 000005 1$: RESET ; SHOULD HAVE NO EFFECT 
Mp 017744 000005 RESET NO EFFECT 
1405 017746 2$: 
017746 012737 000317 000302 MOV #317, $FATAL sMOVE TO MAILBOX # t«euaeee 317 xeewnne 
017754 005212 INC (R2) :SET MSGTYP TO FATAL E 
017756 000000 HALT ; TRAP F WRONG STSTNM 


; H 
:AND REPLACE NEXT INST WITH 756 
AR TRACK 


1404 017760 005037 177776 3$: CLR STATUS : CLE 
1405 017764 005037 000016 CLR 16 ; TRACE STATUS 
Ure 5 017770 012737 000016 000014 MOV #16,14 
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ee ee eee 
OOOCCOOCOOOoOCOoooOoO 


NMIMQMINMIAY) 
oOo°o°oo 
ed eed ed ee eed 


2 
020174 


20176 
20202 


oo 


em ne ae 


CKKABDO 11/44 TRAPS 


esesesce 
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005212 


005037 


MACRO M1113 


000177 
000304 
000111 
016750 


000500 


177776 
000320 


000500 


177776 


000321 


177564 


eee 


177766 
000302 


177766 
000304 


000064 
000066 
000357 
000302 


000064 
177776 


000302 


F 16 
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TEST #111 = TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


SEQUENCE 


-SBTTL TEST #111 - TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


fF EAAAAEAAEAAERAEAE AERA TER AEEEAA AEA AAAERAAAAAAERARAAAAEAAARAAAAAAAARERAE RARE EREE 


:TEST 111 - TEST THAT WHEN TTY INRUPTS IT POPS NEW STATUS 


RAE AAEEAEERAAREEEER AAR EAAA AEE AER EEAEAAERARARAARERRAAR ATES ee2eeeneenaaeese 


TST111: AM 


100$: 


1$: 


2$: 


3$: 
4$: 


5$: 
6$: 


* — 
#177, SFATAL 
(R2) 

#1, CPUERR 
STESTN 
#111, $TESIN 
PROF TE 

6$ 


TTCSR 
STATUS ,#357 
#320,$FATAL 
(R2) 


#BUFF ,R6 
#3$ 64 


6 

#157 ,,STATUS 
TTCSR 
STATUS 

5$ 


#321,$FATAL 
(R2) 


TTCSR 


;BRANCH AROUND 
sMOVE SPECIAL P 
:SET MSGTYP TO FATAL ERROR 
: POWER BIT FOUND SET 


;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
H CLEAR AND HALT IF CLEAR 
OWER MONITOR FATAL # TO SFATAL 


; UPDATE 
; SEQUENCE ERROR? 
;BRANCH TO ERROR HALT ON SEQ ERROR 


SET UP STACK 

: INTERRUPT VECTOR 

:DROP PROCESSOR PRIORITY 

:HIGH PRIORITY ON INTERRUPT 

;SHOULD SET INTERRUPT ENABLE & INTERRUPT 


KREEKERE 


sMOVE TO MAILBOX # xeaxex 320 
2 SET MSGTYP TO FATAL ERROR 

T POP Sg UR pelea 
SAND REPLACE NEXT INST WITH 746 

“ote “hry ENABLE 


U 
SET INTERRUPT ENABLE 


ekeekee 32] exeetnen 


MOVE TO MAILBOX # 


© AND REPLACE NEXT INST WITH 721 


re ee 


110 


1429 


020354 


1446 020356 
1447 020362 
020364 
020372 
020374 


1448 020376 
1449 020404 


1450 020420 
1451 020424 


CKKABDO 11/44 TRAPS 
TEST #112 = TEST THE “WAIT* INSTRUCTION 


oo ooo ooo 
SSLAESSSNSFBSSEE 
VIi~S NUNN NO S&S SION NSN NOr NON 


SANS 
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005212 
000000 
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000001 
000177 
000001 
000304 
000112 
016750 
000100 
000500 
020356 
000066 
177564 


000015 
177564 


000015 
000100 
177776 


000322 


177776 
000323 


000474 


000324 


177564 


177766 
000302 


177766 
000304 


177564 
000064 
177566 


177566 
177564 


000302 
000302 


020344 


000302 


11-NOV-81 10:05 PAGE 95 


G 16 
SEQUENCE 


-SBTTL TEST #112 - TEST THE ‘WAIT’ INSTRUCTION 


FEAR AAEAAAAAAEAAAERAAEAAE AAA AAA AAAAAAERARARAAAARERAAAERARAAAAAAARERAAERERER ES 


:TEST 112 - TEST THE ‘WAIT’ INSTRUCTION 


EEE AAAEEEEEAEAEAEEAAEAEEEAAAEEEEEAEAEREEAEAAEAEAEREREEAREAAERERERAHEAES 


TST112: BIT #1, CPUERR ;SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
BEQ AROUND AR 


E “BRANCH CLEAR AND HALT IF CLEAR 
MOV #177 SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT CPU R BIT 
BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
100$: INC TN UPDATE TEST 
CMP aTib. STESTN “SEQUENCE ERROR? 
BNE 55 “BRANCH TO ERROR HALT ON SEQ ERROR 
TST PROF TE 
BNE 8$ 
BIC #100, TPS :CLEAR INTERRUPT ENABLE 
MOV #BUFF ,SP “SET UP THE STACK 
MOV #4$.64 ‘SET UP THE INTERRUPT VECTOR 
1$: TSTB  ~—s TPS :WAIT FOR READY 
BPL 1$ I 
MOV #15, TPB *DO A CARRIAGE RETURN 
2$: TsTB TPS “WAIT FOR READY TO COME UP 
MOV #15, TPB :DO0 ANOTHER CARRIAGE RETURN 
BIS #100, TPS “SET THE INTERRUPT ENABLE 
CLR STATUS “CLEAR THE PSW 
3$: WAIT “WAIT FOR THE INTERRUPT 
MOV #322,$SFATAL *MOVE TO MAILBOX # «eeexne 322 xeannere 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “WAIT INSTRUCTION DID NOT LOOP 
=TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 733 
4$: Ist STATUS ‘1S THE PSW CORRECT? 
MOV #323, $FATAL :MOVE TO MAILBOX # xeeexee 323 xeenees 
INC (R2) “SET MSGTYP TO FATAL 
HALT *NEW PSW SHOULD HAVE BEEN ZERO 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 723 
5$: CMP BUFF-4,#3$+2 °:1S THE OLD PC SAVED 
ve BEQ 7$ 
MOV #324, $FATAL :MOVE TO MAILBOX # *eexeee 324 eeneeee 
INC (R2) “SET MSGTYP TO FATAL ERROR 
HALT “OLD PC WAS NOT SAVED OR WRONG $TESTN 
:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 712 
7S: CLR TPS “CLEAR INTERRUPT ENABLE 
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TEST #113 = TEST THAT ALL RESERVED INS TRAP 
1452 _SBITL TEST #113 - TEST THAT ALL RESERVED INS TRAP 
2 EEAAEAEAEAEAEARAAEAEAEEKEAETEEAAAKREAEAAAEKRERAARAAREREARAARAREARAARARARAEAAREEEREREEEEE 
“TEST 113 = TEST THAT ALL RESERVED INS TRAP 
s EEAEEAEEKEAAEAREAAKAAEAKEAEAETEAAEEEAAAEAAEAAAKRARAEAREREARERAAARAAREAEAREREAREAREAAEEEE 
020424 032737 000001 177766 TST113: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
020432 001410 BEQ 100$ “BRANCH AROUND CLEAR AND HALT IF CLEAR 
020434 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
020442 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
020444 000000 HALT =CPU POWER BIT FOUND SET 
020446 042737 000001 177766 BIC #1, CPUERR ‘CLEAR THE BIT FOUND SET 
020454 005237 000304 100$: INC TESTN “UPDATE TEST NUMBER 
020460 022737 000113 000304 CMP #113, $TESTN “SEQUENCE ERROR? 
020466 001154 BNE RETS “BRANCH TO ERROR HALT ON SEQ ERROR 
1453 020470 016737 020516 000244 MOV WTRP244,244 : SET UP TO SEE IF 
1454 020476 013737 000010 020544 MOV 10, TENSAV : THIS PROCESSOR HAS THE 
1455 020504 012737 020526 000010 MOV #TRAP10,10 : FLOATING POINT OPTION 
1456 020512 170007 “WORD 170007 * AN ILLEGAL FPP INSTRUCTION 
1457 020514 000415 BR TSFCIS 
1458 020516 013737 021150 021154 TRP244: MOV FPP, FINISH :IF FPP IN-=- RESET END OF TABLE POINTER 
1459 020524 000002 RTI : TURN 
1460 020526 TRAP10: * LEAVE THE TABLE ALONE 
1461 020526 005737 000306 TST SPASS “FIRST PASS?? 
1462 020532 001003 BNE “BRANCH IF NO 
1463 020534 004737 024216 JSR PC, PRTMSG “PRINT MESSAGE POINTED TO BY NEXT WORD 
1464 020540 024036 “WORD MSGNFP “USING THIS ADDRESS AS THE START OF THE MESSAGE 
1465 020542 000002 1$: RTI : RETURN 
1466 020544 000000 - TENSAV: .WORD 0 : A PLACE TO STORE CONTENTS OF 10 
1467 020546 000000 SAVSTK: .WORD 0 “LOCATION TO SAVE STACK POINTER 
1468 020550 TSFCIS: :SEE IF PROCESSOR HAS CIS OPTION 
1469 020550 012737 020636 000004 MOV #AROUND ,4 :SET TIME OUT TRAP VECTOR 
1471 020556 012737 020610 000010 MOV #TNCIS,10 :SET UP RESERVE INST TRAP VECTOR 
167 020564 012700 160000 MOV #160000 ,RO “POINT RO TO NON-EXISTED MEMORY LOC. 
1473 (20570 010637 020546 MOV SP, SAVSTK “MOVE STACK POINTER VALUE TO SAVSTK AND 
1474 020574 162737 000004 020546 SUB #4” SAVSTK “CORRECT TO SHOW 2 EXPECTED PUSHES 
1475 920602 076020 “WORD 76020 “CIS INST = L2DR (DESTROYS CONTENTS OF RO,R1,R2,R3) 
1476 020604 000000 HALT “CIS INST FAILED TO TRAP 
1477 020606 000430 8R ADJNC 
1478 020610 TNCIS: :NO CIS OPTION, EXPECTED TRAP ETHER TO 4 OR 10 DID NOT HAPPEN 
1480 020610 005737 000306 TST SPASS :FIRST PASS 
1481 020614 001003 BNE 
1482 020616 004737 024216 JSR PC PRTMSG :PRINT MESSAGE POINTED TO BY THE NEXT WORD 
1483 020622 024101 .WORD MSGNCIS “USE THIS ADDRESS TO PRINT THE MESSAGE 
1484 0 3 012703 021044 1$: MOV #TABLE1,TAB 
1485 0 0630 062716 000002 ADD #2, (SP) ; CORRECT POINTER TO AFTER THE HALT 
1487 020636 012703 021074 AROUND: MOV ATABLE, TAB *CIS OPTION ORESENT 
1488 020642 020637 020546 CMP SP, SAVSTK “SEE IF 2 WORDS WERE PUSHED ON THE STACK 
1489 020646 001405 BEQ “BRANCH IF SO - CIS SWITCH IN NORMAL POSITION 
1490 020650 004737 024216 JSR PC ,PRIMSG *GO PRINT THE “MESSAGE POINTED TO BY THE NEXT WORD 
1491 0 54 023600 -WORD  CISMSG “USE THIS ADDRESS TO PRINT THE MESSAG 
1498 56 00000 HALT “HALT, ALLOWING USER TO PUT SWITCH IN NORMAL POSITION 
1493 0 000733 BR TSFCIS *GO BACK TO CHECK AGAIN 
1494 020662 062716 000002 1$: ADD #2, (SP) “CORRECT POINTER TO AFTER THE HALT 
1495 0 000002 RTI > RETURN 
1496 020670 012737 000246 000244 ADJNC: MOV #246,244 RESTORE THE TRAP VECTOR 





_—— = — _——— - - eee ee a —<—_— —_ — -_—- —— ——— - — - ——— --_-_-—oeoSe Cl -- - 


| I 16 


CKKABDO 11/44 TRAPS MACRO M1113 11-NOV-81 10:05 PAGE 96-1 SEQUENCE 113 
TEST #113 = TEST THAT ALL RESERVED INS TRAP 
1497 og0er6 013737 020544 000010 MOV TENSAV,10 ; RESTORE THE ILLEGAL INST. VECTOR 
1498 020704 01 $03 GIN1: MOV (TAB) +, FIRST sFIRST OR yep INSTRUCTION 
1499 020706 01 4 MOV (TAB) +,LAST “LAST INSTRUCTION OR GROUP 
1500 020710 020537 021154 CMP FIRST,FINISH TEST ED ALL 
1501 8 714 PETE BEQ G >YES BRANCH 
1236 ay 010537 021156 MOV FIRST, INST SET UP INST 
15035 0207 005237 021156 GIN2: INC INST 
1504 020726 012737 020750 000010 MOV #RET,10 ;SET UP RETURN FROM TRAP 
1505 0207 012706 O00 MOV #BUFF SP SET UP STACK —, 
1506 020740 005037 177776 CLR cc :CLEAR PRIORITY 
1208 020744 000137 021156 JMP INST “EXECUTE RESERVED INSTRUCTION 
1509 : TRAPPING SHOULD SEND YOU HERE 
1510 020750 020627 000474 RET: CMP SP ,ABUFF-4 ; TEST DECREMENT OF SP 
1511 020754 001405 BEQ RET1 
1512 020756 Bers? 000325 000302 MOV #325,$FATAL sMOVE TO MAILBOX # *xexnwe 325 sanenne 
020764 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
020766 000000 HALT :WRONG DECREMENT 
:TO SCOPE REPLACE HALT WITH 240 
> AND REPLACE NEXT INST WITH 637 
1513 020770 023727 000474 021160 RET1: CMP BUFF-4,#INST+2 ;LOC OF INST UNINCREMENTED 
1514 020776 001405 BEQ 
1515 021000 012737 000326 000302 MOV #326, $F ATAL :MOVE TO MAILBOX # ‘*eeeeee 326 teeenne 
021006 005212 INC (R2) :;SET MSGTYP TO FATAL ERROR 
021010 000000 HALT :INST INC ON TRAP 
-TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 626 
1516 oot 005737 000476 RET2: TST BUF F=-2 
1517 021016 001405 BEQ RET3 
021020 RET4: 
021020 012737 000327 000302 MOV #327.,$FATAL :MOVE TO MAILBOX # ‘*eeeene 327 eeeenee 
021026 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
021030 000000 HALT sCONDITION CODES SET ON TRAP OR WRONG STSTNM 
TO SCOPE REPLACE HALT WITH 240 
* AND REPLACE NEXT INST WITH 616 
1518 021032 023701 021156 RET3: CMP INST ,LAST 
1519 021036 001722 BEQ GIN1 sSET UP NEW GROUP 
1369 021040 000137 020722 JMP GIN2 “EINISH OLD GROUP 
1356 021044 076017 TABLE1: 76017 :CIS INSTRUCTIONS 
1523 021046 076032 76032 
1389 021050 076037 76037 
1525 021052 076045 76045 
15 $ 1054 hyd 76047 
15 1056 076077 76077 
1528 021060 076117 761 
15 1062 076132 76132 
15 1064 076137 76137 
1531 0 1066 076145 76145 
1336 021070 076147 76147 
1533 021072 076177 76177 
1534 021074 000007 TABLE: 7 
1535 021076 000077 77 
1336 021100 000207 207 =RTS,RT1,JMP 
153 1102 ei 27 227 
1538 021104 007077 7077 
1539 021106 007777 7777 
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: TEST #114 = TEST ILLEGAL HALT 
| 1566 _SBITL TEST #114 = TEST ILLEGAL HALT 
FSARARAAEAAAAAAAAAAEAE ARERR AAAAAAAAARAAAAAAAAAAEKAAAKAAAARARAAAAAAERAR AREAS 
“TEST 114 = TEST ILLEGAL HALT 
SEE EAAEEAAEAEEEAAEEATEAEAEEAEAAAAAAAAAREAERARAAAAEEAARAAEAREARAARAEARAEAAARAAEAEAEE 
021170 032737 000001 177766 TST114: BIT #1. CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
021176 001410 BEQ 100$ “BRANCH AR CLEAR AND HALT IF CLEAR 
021200 012737 000177 000302 MOV #177. $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
021206 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
021210 HALT CPU R BIT FOUND SET 
021212 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
021220 005237 000304 100$: INC TESTN “UPDATE TEST ER 
021224 022737 000114 000304 CMP #114, $TESIN ; SEQUENCE ERROR? 
021232 001073 BNE 4$ CH TO ERROR HALT ON SEQ ERROR 
1567 021234 012706 000500 MOV #BUFF SP *STACK POINTER SE 
1568 0212460 005037 177766 CLR CPUERR “CLEAR CPU ERROR REGISTER 
1569 021244 012737 021300 000004 MOV #1$, RTRAPS “SETUP TRAP RETURN 
1570 0 1252 052737 040000 177776 BIS #040000,PSw *GO TO SUPER MODE 
1571 021260 000000 HALT “EXECUTE INST UNDER TEST 
192¢ :FAILURE, NO TRAP 
157 021262 105037 177777 CLRB Ss PSw+1 :GO BACK TO KERNEL 
1574 021266 012737 000330 000302 MOV #330, $FATAL “MOVE TO MAILBOX # xxxaxee 330 xenenes 
0 1276 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
021276 000000 HALT “HALT IN SUPER MODE FAILED TO TRAP 
:TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 755 
1575 021300 1$: 
1576 021300 013737 177766 000502 MOV CPUERR,RCPUER ;READ AND SAVE CPU ERROR REGISTER 
1577 021306 042737 177413 000502 BIC #CERMSK RCPUER :MASK OFF UNUSED CPU ERR REG BITS 
1578 021314 022737 000200 000502 CMP #200, RCPUER *IS ILLEGAL HALT BIT SET? 
1579 021322 001405 BEQ 
021324 012737 000331 000302 MOV #331, $FATAL :MOVE TO MAILBOX # eexeee 331 xeeeeese 
021332 005212 INC (R2) “SET MSSGTYP TO FATAL ERROR 
021334 000000 HALT ‘INCORRECT CPU ERR REG CONTENTS 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 736 
1580 021336 005037 177766 2$: CLR PUERR “CLEAR CPU ERR REG 
1581 021342 012737 021376 000004 MOV G3$. RTRAPS ‘SETUP TRAP 
1382 021350 052737 140000 177776 BIS #140000,PSw =GD TO USER MODE 
1583 021356 000000 HALT 
1584 :FAILURE, NO 
1585 021360 105037 177777 CLRB Ss PSwi+1 :GO BACK TO KERNEL 
1586 021364 012737 000332 000302 MOV #332, $FATAL “MOVE TO MAILBOX # *eeeeee 332 cennnee 
021372 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
021374 000000 HALT “HALT IN USER MODE FAILED TO TRAP 
*TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 716 
1587 021376 3S: 
1588 021 76 013737 177766 000502 MOV CPUERR.RCPUER —; SAVE cPy ERROR REGISTER 
1589 021404 042737 177413 000502 BIC #CERMSK ZRCPUER Sk OFF UNUSED CPU ERR REG BITS 
1590 021412 022737 000200 000502 CMP #200,R ‘IS ILLEGAL HALT BIT SET? 
1591 0 1420 1405 _ BEQ 5$ 
0 14e0 012737 000333 000302 MOV #333, $FATAL :MOVE TO MAILBOX # steenee 333 eeneene 
021430 005212 INC (R2) “SET MSGTYP TO FATA 
021432 000000 HALT : INCORRECT CPU ERR REG CONTENTS 
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T #115 = TEST SPL INST. FOR NOP IN USER/SUPER MODES 
1595 _SBTTL TEST #115 - TEST SPL INST. FOR NOP IN USER/SUPER MODES 
f TAAAAAREREAAAAAAAAAAARAA AERA AAAAAAAAAAAAAAAEA AEE EERE AAAAAEKAARAAE AREA ERE 
“TEST 115 = TEST SPL INST. FOR NOP IN USER/SUPER MODES 
PPO ee Te eT TT TTT TTT TTT TET TIT TTL TTT LITT tii 
021444 032737 000001 177766 TST115: BIT #1, CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
021452 001410 BEQ 1 ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
021454 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
021462 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
021464 000000 HALT *CPU POWER BIT FOUND SET 
021466 042737 000001 177766 BIC #1. CPUERR ‘CLEAR THE BIT FOUND SET 
021474 005237 000304 100$: INC $TESTN “UPDATE TEST NUMBER 
021500 022737 000115 900304 CMP #115, $TESTN = SEQUENCE ERROR? 
021506 001125 BNE SEQ s;BRANCH TO ERROR HALT ON SEQ ERROR 
1596 021510 012706 000500 MOV #BUFF .SP “SETUP STACK 
1597 021514 052737 040000 177776 BIS #040000,PSw *GO TO SUPER MODE 
1598 021522 000277 SCC : 
1599 OS 4 000231 SPL 1 :SPL SHOULD=NOP IN USER/SUPER MODES 
1600 021526 000232 SPL 
1601 021530 000233 SPL 3 
1602 021532 000234 SPL i 
1603 021534 000235 SPL 6 
1604 021536 000236 SPL 6 
1605 021540 000237 SPL 7 
1606 021542 013737 177776 022456 MOV PSwW,SPSW :SAVE PSW 
1607 021550 023727 022456 040017 CMP SPSW, 4040017 sVARIFY THAT PSW HAS NOT CHANGED 
1608 021556 001407 BEQ 1$ 
1609 021560 105937 177777 CLRB = PSw+1 :GO BACK TO KERNEL 
1610 021564 012737 000334 000302 MOV #334, SFATAL “MOVE TO MAILBOX # *exxxee 334 sxennee 
021572 005212 INC (R2) ;SET MSGTYP TO FATAL ERROR 
021574 000000 HALT ;PRIORTY LEVELS CHANGE 
"TO SCOPE REPLACE HALT WITH 240 
: AND REPLACE NEXT INST WITH 744 
1611 021576 012737 040340 177776 1$: MOV #040340,PSw *SET PRIORTY TO 7 
1612 021604 000257 CCC “CLEAR CONDITION CODES 
1613 021606 000230 SPL 0 *SPL SHOULD=NOP IN SUPERVISOR MODE 
1614 021610 013737 177776 022456 MOV PSwW, SPSW “SAVE PSW 
1615 sty ey 023727 022456 040340 CMP SPSW, #040340 sVARIFY THAT PSW PRIORTY AND CONDITION CODES HAVE NOT CHANGE 
1616 021624 001407 BEQ 2$ 
1617 0 1626 105037 177777 CLRB 3s PSw+1 :GO BACK TO KERNEL 
1618 021632 012737 000335 000302 MOV #335, SFATAL “MOVE TO MAILBOX # *xeexee 335 xenneee 
021640 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
021642 000000 HALT “SPL INSTRUCTION CHANDED PSW SHOULD BE NOP 
:TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 721 
1619 021644 012737 140000 177776 2$: MOV #140000,PSw “GO TO USER MODE 
1620 021652 000277 SCC “SET CC 
1621 021654 000231 SPL “SPL SHOULD=NOP IN USER MODE 
1622 021656 000232 SPL 2 
1623 021660 000233 SPL 3 
1624 021662 000234 SPL 4 
1625 021664 000235 SPL 5 
16 6 021 000236 SPL é 
1627 021670 000237 SPL 7 
1628 021672 013737 177776 022456 MOV PSW, SPS :SAVE PSW 
1 1700 023727 022456 140017 CMP SPSW, #140017 “VARIFY THAT PSW HAS NOT CHANGED 
1630 021706 001407 BEQ § 
1631 021710 105037 177777 CLRB 3s PSwe :GO BACK TO KERNEL 
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EST #115 = “TEST SPL INST. FOR NOP IN USER/SUPER MODES 
1632 021714 Shera? 000336 000302 MOV #336,$FATAL sMOVE TO MAILBOX # seeeeee 336 eeeneee 
021722 1 INC (R2) > SET MSGTYP TO FATAL ERROR 
021724 HALT sPRIORTY LEVELS HAS CHANGED 
:TO SCOPE REPLACE HALT WITH 240 
+ AND a reed NEXT INST WITH 670 
1633 021726 One rae 140340 177776 3$: MOV #140340,PSW =SET PRIORTY TO 7 
1634 0217 57 ccc :CLEAR CONDITION CODES 
1635 0217 39 SPL 0 ;SPL SHOULD=NOP IN USER MODE 
1636 021740 013737 177776 022456 MOV PSW,SPSW ‘SAV E PSW 
1637 021746 Oe 727 022456 140340 CMP SPSW, 4140340 = VARIFY THAT PSW PRIORTY AND CONDITION CODES HAVE NOT CHANGE 
1638 021754 1407 BEQ FSPL 
1077 8 if 105037 177777 CLRB PSW+1 :GO BACK TO KERNEL 
0 1% Oierse 000337 000302 MOV 4337 ,$FATAL sMOVE TO MAILBOX # eeeene 337 eeanene 
0217 005212 INC (R2) *SET MSGTYP TO FATAL ERROR 
021772 HALT s;SPL INST.CHANGED PSW OR WRONG TESTA 
:TO SCOPE REPLACE HALT WITH 240 
:AND REPLACE NEXT INST WITH 645 
021774 FSPL: 
021774 105037 177777 CLRB PSW+1 :GO BACK TO KERNEL 


;THIS TEST VARIFIES FOR ALL COMBINATIONS OF PIR AND PROCESSOR 
:PRIORTY LEVELS THAT REQUESTS ARE GRANTED (TRAP TO 240 OCCURS 
sBY THE PROCESSOR,ONLY WHEN THE PIR IS AT A HIGHER LEVEL THAN 

* THE PROCESSOR. 

THE CONTENTS OF SPIR,SPSW AND TRP240 SHOULD BE EXAMINED ON _ 
“SPIR BITS 2-0 CONTAINS ONE LESS THAN THE PIR REQUEST LEVEL A 

; THE TIME OF ER SW BITS 2-0 CONTAINS THE PROCESSOR PRIORTY 
TAT THE TIME OF ERROR.TRP240 INDICATES WHETHER OR NOT A TRAP WAS 
sEXPECTED (1= EXPECTING TRAP TO 240) 

;THE SPL INSTRUCTION IS USED TO SETUP PROCESSOR PRIORTY. 
:NOTE: THIS IS THE FIRST REAL TEST _* a SPL_INST. 

[ON ERROR, IF EXPECTED PIRQ TRAP DID NOT OCCURE VARIFY SPL 
[OPERATION BY COMPARING SPSW BITS<2-0> WITH PSW PRIORTY 
:BITS<7~5>.0N ERROR IF AN UNSPECTED PIRQ TRAP OCCURED 
:VARIFY SPL OPERATION BY COMPARING SPSW BITS<2-0> WITH 
:PROCESSOR PSW<7=5> ON STACK. 
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TEST #116 = TEST PIRQ LEVELS AND SPL INSTRUCTION 


SEQUENCE 


1660 _SBTTL TEST #116 - TEST PIRQ LEVELS AND SPL INSTRUCTION 
SERRE RARE EEE EEE EEE EAE AAA AEA AAA AEA AAR ERATE ARTETA EES 
“TEST 116 - TEST PIRQ LEVELS AND SPL INSTRUCTION 
PPPererreTr TT TTT TITITITT TTT TTL LEILA LL LLL LELLLLLLiLLiL dk 
022000 032737 000001 177766 TST116: BIT " CPUERR :SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
22006 001410 BEQ ita “BRANCH AROUND CLEAR AND HALT IF CLEAR 
022010 012737 000177 000302 MOV “i ., SFATAL “MOVE SPECIAL POWER MONITOR FATAL # TO $FATAL 
022016 0°5212 INC “SET MSGTYP TO FATAL ERROR 
022020 000°0 HALT “CPU POWER BIT FOUND SET 
022022 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
22030 005237 000304 100$: INC TESTN “UPDATE TEST NUMBER 
022034 022737 000116 000304 CMP #116, $TESTN > SEQUENCE ERROR? 
022042 001155 BNE PTRP “BRANCH TO ERROR HALT ON SEQ ERROR 
1661 022044 005037 022460 CLR PIRPSW 
1662 022050 012737 022412 000000 MOV azTRP 0 :SET LOCATION ZERO TRAP VEC 
1663 022056 012737 000340 000002 MOV #340,2 
1664 022 012737 022426 000004 MOV AT4TRP,4 :SET UP FAILURE TRAP VEC 
1665 622072 012737 000340 009006 MOV BS 
1666 022100 012737 022442 000024 MOV AT24TRP, 24 sSETUP POWER FAIL VEC 
1667 022106 012737 000340 000026 MOV 8 
1668 022114 012737 022354 000240 MOV MPOTRE PIRVC1 SETUP PIRQ VEC 
1669 022122 012737 000340 000242 MOV #340, PIRVC2 “SET 242 TO PRIORTY 7 
1675 022130 012706 0005 MLOOP: MOV maUFF SP aR TUP STACK 
1676 022134 052737 000340 177776 IS “SET PROCESSOR PRIORTY TO 7 
1677 > COMPUTE WE PECTED RESULT 
1678 022142 013700 022460 MOV PIRPSW,R 
1679 022146 042700 177707 BIC #177707,RO :SETUP SPIR 
1680 022152 006200 ASR RO 
1681 022154 006200 ASR RO 
1682 022156 006200 ASR RO 
1683 022160 010037 022454 MOV RO, SPIR :SAVE RO IN SPIR 
1684 022164 013700 022460 MOV PIRPSW.RO 
1685 022170 042700 177770 BIC #177770,R0 :SETUP SPSW 
1686 022174 010037 022456 MOV SPSW 
1687 022200 023737 022454 022456 CMP SPIR,SPSW 
1688 022206 002003 BGE BRANCH IF PIR > PSW 
1689 022210 005037 022462 CLR TRP240 *CLEAR FLAG 
1690 022214 000403 BR $ 
1691 022216 012737 177777 022462 28: MOV #177777. TRP240 :SET FLAG 
1692 022224 004737 022464 3$: JSR C,SETPI “SETUP PIRQ BASE ON THE # IN SPIR 
1693 SET PSw PBRIORTY BASE ON THE # IN SPSW 
1694 022230 042737 000007 022244 BIC AR LSB 5 BITS OF SPL INST.AT 1$ 
1695 022236 053737 022456 022244 BIS SPs. 1$ “SET LSB 3 BITS OF SPL INST.TO DESIDED PROC. PRI. 
1696 022244 000230 1$ SPL 0 -THE ACTUAL PRIORTY SET INTO THE PSW IS CONTROLLED BY 
1697 >THE PREVIOUS TWO INSTRUCTION. 
1698 022246 000240 NOP 
1699 022250 005737 022462 TST TRP240 
1700 022254 001405 BEQ NXTST 
022256 012737 000340 000302 MOV #340, $FATAL sMOVE TO MAILBOX # *eeeeee 340 teeeeee 
022264 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
022266 00 HALT S EXPECTED PIRQ TRAP BUT DID NOT GET IT 
"TO SCOPE REPLACE HALT WITH 240 
. AND REPLACE NEXT INST WITH 717 
1701 022270 000240 NXTST: NOP “SET UP FOR PASS COUNT 
1703 
1704 022272 005237 022460 INC PIRPSW :SETUP FOR NEXT PASS THROUGH LOOP 
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1728 022424 
1729 022426 
1730 022426 
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1731 022440 
1732 022442 
1733 O2eeee 
022450 
022452 


1734 022454 
1735 022456 
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TEST #116 = TEST PIRQ 


S 


oOOoCoo°ooo 
oo~-—-oo— 
VIN =O VIPINMNVINOU 


S=99 


000735 
012737 
005212 
000000 
000522 
012737 
005212 
600000 
000721 
012737 
005212 
000000 
000713 


012737 
005212 
000000 


000000 
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022460 
177772 


022656 
022462 


000341 


000342 


000343 


000344 


000345 


000004 


000024 
000240 


000302 


000302 


000302 


000302 


000302 


PQTRP: 


PTRP: 


ZTRP: 


T4TRP: 


T24TRP: 


SPIR: 


SPSW: 
PIRPSW: 


(a ee ee a = ee ae ee ee 
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LEVELS AND SPL INSTRUCTION 


000070 


PIRPSW,#70 
MLOOP 

#6,4 

6 


0 
A#PWRDWN ,24 


#242,240 
2 


TST117 
TRP240 


NXTST 
#341 ,$FATAL 
(R2) 


NXTST 
#342, $FATAL 
(R2) 


TST117 
#343 ,SFATAL 
(R2) 


NXTST 
#344 ,SFATAL 
(R2) 


NXTST 
4345 ,SFATAL 
(R2) 


. WORD 
- WORD 
. WORD 


ooo 


1 


SEQUENCE 
;BRANCH TO MLOOP IF COUNT IS LESS THAN 70 
;DONE WITH LOOPING PIRQ REQUESTS 
sRESTORE RETURNS 
;PRIORTY TRAP SERVICE 
sMOVE TO MAILBOX # *eeeeee 341 xeanene 


;SET MSGTYP TO FATAL Sat @0 

; EXPECTED NO PIRQ TRAP,BUT GOT ONE 
;TO SCOPE REPLACE HALT WITH 540 

ZAND REPLACE NEXT INST WITH 655 


342 


REREKASE 


sMOVE TO MAILBOX # *%xae0% 
sSET MSGTYP TO FATAL ERROR 
; WR TEST NUMBER 


ONG 
:TO SCOPE REPLACE HALT WITH 240 
SAND REPLACE NEXT INST WITH 615 


REA 


:MOVE TO MAILBOX # ‘texxe%% 343 
5 SET MSGTYP TO FATAL ERROR 
CTED TRAP TO ZERO OCCURED DURING PIRQ TST 
‘TO SCOPE REPLACE HALT WITH 240 
ZAND REPLACE NEXT INST WITH 641 


O MAILBOX # **eee2% keekeet 


MOVE T 344 
SSET MSGTYP TO dy ERROR 
SUNSPECTED TRAP TO 4 DURING PIRG TESTING 
;TO SCOPE REPLACE OMALT WITH 240 
SAND REPLACE NEXT INST WITH 633 


MOVE MAILBOX # texexee 345 eeeeeee 


TO MA 
:SET MSGTYP TO FATAL ERROR 
[UNSPECTED POWER FAIL TRAP DURING PIRQ TESTING 
:TO SCOPE REPLACE HALT WITH 240 


SAND REPLACE NEXT INST WITH 625 


120 
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tA 022654 
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177772 
000240 
000242 
000000 


023727 


012737 
000427 
012737 
000423 
012737 
000417 
012737 
000413 
012737 
000407 
012737 
000403 


012737 
000207 





MACRO M1113 
TEST PIRQ LEVELS AND SPL INSTRUCTION 


022454 
022454 
022454 
022454 
022454 
022454 
022454 
000346 


001000 
002000 
004000 
010000 
020000 
040000 
100000 


000000 
000001 
000002 
000003 
000004 
000005 
000006 
000302 


177772 
177772 
177772 
177772 
177772 
177772 
177772 


SETPIRQ: 


1$: 
2$: 
3$: 
4$: 
5$: 
6$: 


7$: 
10$: 


11-NOV-81 10:05 PAGE 100 


PIRQ=177772 


HALT 


RTS 


=240 
PIRVC2= 
TRP240: 


42 
-WORD 0 


SPIR,40 
SPIR,#1 
SPIR,#2 
SPIR,#3 
SPIR,#4 
SPIR,#5 
SPIR #6 
#346, SFATAL 
(R2) 


alts 
#2000 ,PIRQ 
#4000 ,PIRQ 
#10000, PIR 
; 0000,PIRO 
oo 


1 
#100000 ,PIRQ 
PC 


; TABLE FOR PIRQ SETUP 
; PIR LEVEL 


SOU & AD 
~ 


ee a ee ee 


1 


;MOVE TO MAILBOX # 
;SET MSGTYP TO FATAL ERROR 
3A IN SPIR DOES 


SEQUENCE 12) 


REEKEEE 


346 


£a2aaane 


E SENSE OR SPIR NOT=0-6 


NOT MAK 
:TO SCOPE REPLACE HALT WITH 240 
yAND REPLACE NEXT INST WITH 560 


: LOADED INTO PIRQ REG RO 


20000 
40000 
100000 


EROS 6 SS ee 





a eee ee 


EEE eee ee a eee 
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TEST #117 = CHK ODD ADRS TRAP WITH SP AT ODD ADRS ON RTi 


SEQUENCE 


1785 .SBTTL TEST #117 = CHK ODD ADRS TRAP WITH SP AT “DD ASR oN RTI 
TIAA I ICICI I ICIS IEISI SII EIR ISIE IOICIISOIIIO III ITE STAI TSS S SSSA SISASS IAA 
: TEST 117 = CHK ODD ADRS TRAP WITH SP AT ODD ADRS ON RTI 
PPPTTTTTTTTTTTT TTT TITTLE LL LALLLLIL LLL LLL LLiLL 
022656 032737 000001 177766 tST117: BIT #1,CPUERR + SEE IF BIT 0 OF CPUERR a MONITOR BIT) IS SET 
022664 001410 BEQ 1 BRANCH AROUND CLEAR AND HALT IF CLEAR 
22 012737 000177 000302 MOV #177, $FATAL :MOVE SPECIAL POWER MONITOR FATAL # TO SFATAL 
022674 005212 INC (R2) :SET MSGTYP TO FATAL ERROR 
022676 000000 HALT = CPU POWER BIT FOUND SET 
022700 042737 000001 177766 BIC #1,CPUERR “CLEAR THE BIT FOUND SET 
22706 005237 009304 100$: INC STESTN UPD TE TEST NUMBER 
022712 022737 000117 000304 CMP #117,$TESTN : SEQUENCE ERROR? 
022720 001026 BNE OATSE “BRANCH TO ERROR HALT ON SEQ ERROR 
1786 022722 012737 140000 177776 MOV 2140300. 177776 ;SET CURRENT MODE TO 
1787 022730 2706 000001 MOV #1,S :PUT ODD ADDRESS IN STACK POINTER 
1788 022734 012737 022752 000004 MOV Ate 4 : TRAPS TO 1$ 
1789 022742 012737 000340 000006 MOV #340,6 ;PRIORITY 10 _7 
1790 022750 000002 RTI -TEST RTI - SHOULD ODD ADDRESS TRAP TO 4 
1791 022752 022737 030340 177776 1$: CMP oreo’ 177776 +SEE IF PREVIOUS MODE USER AND PRIORITY 7 LOADED 
1792 022760 001413 BEQ ODAD = BRANCH OUT IF OK 
1793 . seannnesneeeaaes peanenenneusehheounmnaaneneenonsnconenunconsoccenceceasece 
1794 “IF PSW CONTAINS 30000, YOU MIGHT BE MISSING M7095 ECO 46. 
1795 SHRRRERRERRREEERAEE EERE RE EERE ARERR REE ARER ARREARS REET 
1796 022762 012737 000347 000302 MOV i alata sMOVE TO MAILBOX # xeeaxee 347 xeeeKee 
022770 005212 INC (R2) :SET MSGTYP TO ie ERROR 
022772 000000 HALT ;PSw NOT PROPERLY LOADED 
>TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT ad WITH 752 
1797 022774 000405 ODADEN = BRANCH TO EXIT TEST 
1798 022776 OATSE: 
022776 012737 000350 000302 MOV #350,S$FATAL sMOVE TO MAILBOX # seeeaee 350 teeenes 
023004 005212 INC (R2) :SET MSGTYP TO FATAL E 
023006 000000 HALT “WRONG STSTNM 
3TO SCOPE REPLACE HALT WITH 240 
: AND REPLACE NEXT INST WITH . 
1799 023010 012737 000340 177776 ODADEN: MOV #340,177776 =MODE BACK TO KERNEL, PRIORITY = 7 
1800 023016 012737 000006 000004 MOV #6,4 sRESET TRAPS TO 4 VECTOR ;DPMO02 
1801 023024 005037 000006 CLR 6 PUT A HALT IN 6 = DPMOO2 
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TEST #120 - PIRQ/UNIBUS INTERRUPT ORDER TE 





1802 _SBITL TEST #120 - PIRQ/UNIBUS INTERRUPT ORDER TEST 
SERA E EERE RE RRR E REE E ERE RE RR ERA E ES 
“TEST 120 = PIRQ/UNIBUS INTERRUPT ORDER TEST 
SERRA EERE RAE EEE ERS CREATE RREEER ERE EERE REAR RE R ERE EES 
023030 032737 000001 177766 TST120: BIT #1. CPUERR *SEE IF BIT 0 OF CPUERR (POWER MONITOR BIT) IS SET 
023036 001410 BEQ 1 ‘BRANCH AROUND CLEAR AND HALT IF CLEAR 
023040 012737 000177 000302 MOV #177, $FATAL “MOVE SPECIAL POWER MONITOR FATAL # TO S$FATAL 
023046 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
023050 000000 HALT “CPU POWER BIT FOUND SET 
023052 042737 000001 177766 BIC #1, CPUERR “CLEAR THE BIT FOUND SET 
02 005237 000304 100$: INC TESTN “UPDATE TEST NUMBER 
023 022737 000120 000304 CMP #120,$TESTN “SEQUENCE ERROR? 
023072 001137 BNE PUIO “BRANCH TO ERROR HALT ON SEQ ERROR 
1803 023074 012706 000500 MOV #500,SP “RESET THE STACK POINTER :DPMO02 
1804 023100 012737 000340 177776 MOV #340,177776 “PRIORITY TO 7 = DPMOO2 
1805 023796 013737 000100 023460 MOV 100, CVECSV “SAVE THE CLOCK VECTOR = DPMOO2 
1806 023114 012737 023404 000100 MOV #PUIOEN, 100 “SET CLOCK INTERRUPTS TO THE END > DPMOO2 
1807 023122 013737 000102 023462 MOV 102, CPRISV “SAVE THE CLOCK PRIORITY > DPMOO 
1808 023130 012737 000300 000102 MOV #300, 102 “MOVE PRIORIY 6 TO CLOCK PRIORITY = DPMOO2 
1809 023136 013737 000240 023464 MOV 240, PVECSV “SAVE THE PIRQ VECTOR = DPMOO2 
1810 023144 012737 023240 000240 MOV #3$,240 “SET PIRQ INTERRUPTS TO 3$ = DPMOO2 
1811 023152 013737 000242 023466 MOV 242. PPRISV “SAVE THE PIRQ PRIORITY = DPMOO2 
1812 023160 012737 000040 000242 MOV “SET PIRQ PRIORITY T ; 
1813 023166 012737 001000 177772 MOV #1000, PIRQ “REQUEST PIRQ LEVEL 1 INTERRUPT = DPMOO2 
1814 023174 105737 177546 1$: TSTB =: 177546 *1S THE LINE CLOCK READY YET = DPMOO 
1815 023200 100375 BPL CH BACK UNTIL : 
1816 023202 012737 000100 177546 MOV #100,177546 *SET THE INTERRUPT ENABLE, CLEAR READY ; 
1817 023210 105737 177546 2$: TSTB =—-:- 177546 “WAIT FOR READY AGAIN = DPMOO2 
1818 023214 100375 BPL 2$ “BRANCH BACK UNTIL SET AGAIN = DPMOO2 
1819 023216 005037 177776 CLR 177776 *LOWER PRIORITY > DPMOO2 
1820 023222 000240 NOP “WAIT OUT THE 11/44 DELAY =DPMOO2 
1821 023224 012737 000351 000302 MOV #351, S$FATAL “MOVE TO MAILBOX # *eeeeee 351 xxecees 
023232 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
023234 HALT “NO INTERRUPT WHEN EXPECTED 
=TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 716 
1822 025256 000405 “ BR NXTPRT ‘BRANCH TO NEXT PART = DPMO02 
1824 023240 012737 000352 000302 MOV #352, $FATAL :MOVE TO MAILBOX #& eeeee 352 eennene 
023246 005212 INC (R2) °SET MSGTYP TO FATAL ERROR 
023250 00000¢ HALT * INTERRUPT WRONGLY GIVEN TO THE PIRQ 
‘TO SCOPE REPLACE HALT WITH 240 
‘AND REPLACE NEXT INST WITH 710 
1825 SRR EEE RAEEREREREEEREAAERE AE RERERERARAARAAAAAAAERARERAAR ARATE RARER 
1826 > YOU MAY BE MISSING M7098 ECO # 7 
1827 SEEKER EERAEEE AERA ER RARER AREA RAAREAAERAEERA RARE RAAAAARERERA RARER ATES 
1828 023252 012737 000340 177776 NXTPRT: MOV #340,177776 -SET PRIORITY BACK TO 7 = DPMO02 
1829 023260 012706 000500 MOV #500,SP “RESET THE STACK POINTER = DPMOO2 
1830 023264 012737 000300 000242 MOV #300,242 “SET PIRQ PRIORITY TO 6 = DPMOO2 
1831 023272 012737 023360 000100 MOV #3$,100 “CLOCK VECTOR TO ERROR ROUTINE > DPMOO2 
832 023300 012737 023404 000240 MOV #PUIOEN, 240 “PIRQ INTERRUPTS TO PUI =DPMOO2 
833 023306 012737 001000 177772 MOV #1000 PIRQ ‘REQUEST PIRQ LEVEL 1 INTERRUPT = DPMOO2 
1834 023314 105737 177546 1$: TSTB ~—-: 177546 “1S THE LINE CLOCK READY YET =DPMOO2 
1835 023320 100375 BPL 4 “BRANCH BACK UNTIL IT I = DPMOO2 
1836 023322 012737 000100 177546 MOV #100 177546 “SET THE INTERRUPT ENABLE, CLEAR READY ;DPMOO2 
1837 023330 105737 177546 2$: TSIB. ~—s-_:- 1177546 “WAIT FOR > DPMOO2 
1838 023334 100375 BPL 2$ “BRANCH BACK UNTIL SET AGAIN = DPMOO2 
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20 = PIRQ/UNIBUS INTERRUPT ORDER TEST 


T #1 
1839 023336 005037 177776 CLR 177776 : LOWER PRIORITY TO 0  DPMOO2 
1840 023342 000240 NOP WAIT OUT THE 11/44 DELAY * DPMOO2 
1841 023344 012737 000353 000302 MOV #353, $FATAL “MOVE TO MAILBOX # taeaeee 353 seenees 
023352 005212 IN (R2) “SET MSGTYP TO FATAL ERROR 
023354 000000 HALT “NO INTERRUPT WHEN EXPECTED 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 646 
1842 023356 000412 i BR PUIOEN “BRANCH OVER SEQUENCE ERROR CODE :DPMO02 
023360 012737 000354 000302 MOV #354,$FATAL :MOVE TO MAILBOX # *#ennxe 354 saennee 
023366 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
023370 000000 HALT ‘INTERRUPT WRONGLY GIVEN TO THE CLOCK 
“TO SCOPE REPLACE HALT WITH 240 
“AND REPLACE NEXT INST WITH 640 
1844 023372 PUIO: 
023372 012737 000355 000302 MOV #355, $FATAL sMOVE TO MAILBOX # teaaene 355 sxeneee 
3400 005212 INC (R2) “SET MSGTYP TO FATAL ERROR 
023402 000000 HALT “WRONG $TSTNM 
*TO SCOPE REPLACE HALT WITH 240 
AND REPLACE NEXT INST WITH 633 
1845 023404 005037 177546 PUIOEN: CLR 177546 “CLEAR THe CLOCK CSR 
1846 023410 012737 000340 177776 MOV #340, 177776 “SET PRIORITY 
1847 023416 005037 177772 CLR PIR “CLEAR THE PIRQ REGISTER 
1848 023422 013737 023460 000100 MOV CVECSV, 100 “RESTORE THE CLOCK VECTOR 
1849 023430 013737 023462 000102 MOV CPRISV.102 “RESTORE THE CLOCK PRIORITY 
1850 023436 013737 023464 000240 MOV PVECSV,240 “RESTORE THE PIRQ VECTOR 
1851 023444 013737 023466 000242 MOV PPRISV.242 “RESTORE THE PIRQ PRIORITY 
1852 023452 012706 000500 MOV #500,SP [CLEAN UP STACK 
1853 023456 000404 BR END “BRANCH OVER THE STORAGE LOCATIONS 
1855 023460 000000 CVECSV: .WORD 0 sLOCATION TO STORE CLOCK VECTOR 
1856 023462 000000 CPRISV: .WORD 0 “LOCATION TO STORE CLOCK PRIORITY 
1857 023464 000000 PVECSV: .WORD 0 “LOCATION TO STORE PIRQ VECTOR 
1858 023466 000000 PPRISV: .WORD 0 “LOCATION TO STORE PIRQ PRIORITY 





———— 
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END OF PASS ROUTINE 








1859 .SBTTL END OF PASS ROUTINE 

1860 023470 005237 000306 END: iNC $PASS 

1861 0 3474 105237 023576 INCB  _—- PASSPT :SHOULD PRINT THIS PASS? 

1862 0 500 001017 BNE ACT “N 

1863 023502 132737 000040 000321 BITB #40,$ENVM “WILL APT ALLOW PRINTING? 
1864 023510 001013 BNE ACT “NO 

1865 0 3512 023727 000042 023550 CMP 42, HSENDAD 

1866 023520 001407 BEQ ACT 

1867 023522 004737 024216 JSR PC PRTMSG :PRINT MESSAGE POINTED TO BY THE NEXT WORD 
1868 0 3268 023723 ~ WORD MSG :USE THIS ADDRESS TO PRINT THE MESSAGE 
1869 023530 000005 RESET 

1870 023532 012737 177761 023576 MOV #-15.,PASSPT | ;DO IT ABOUT 15 DECIMAL TIMES 
1871 023540 013700 000042 ACT: MOV 42,R0 “CHECK ACT 

1872 023544 001405 BEQ GOAGIN “KEEP GOING IF NO ACT 

1873 023546 000005 RESET 

1874 023550 004710 SENDAD: JSR PC, (RO) ;ACT HOOKS 

1875 023552 000240 NOP 

1876 023554 000240 NOP 

1877 023556 000240 NOP 

1878 023560 012737 000012 000010 GOAGIN: MOV #12,10 

1879 023566 005037 000012 CLR 

1880 023572 000137 000540 JMP RESTRT :DO NEXT PASS 

1881 023576 177777 PASSPT: 1 


me eee + —— 
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ASCII MESSAGES 


1882 .SBTTL ASCII MESSAGES 
1883 023600 015 012 103 CISMSG: .ASCII <15><12>.CIS SWITCH IS IN THE MAINTENANCE POSITION.<15><12> 
1884 023655 120 125 124 eASCIZ aa IN NORMAL POSITION AND CONTINUE.<15><12> 
1885 023723 015 012 105 MSG: .ASCIZ <15><12>.END OF CKKABDO 11/44 TRAPS. 
1886 023760 015 012 103 PNAME: .ASCIZ <15><12>+CKKABDO 11/44 TRAPS+ 
1887 024 015 012 103 TITLE: .ASCIZ <15><12>+CKKABDO 11/44 TRAPS+<15><12> 
1888 024036 015 012 116 MSGNFP: .ASCIZ <15><12>.NO FLOATING POINT OPTION PRESENT. 
U4 024101 015 012 116 MSGNCIS:. rey <15><12>.NO CIS OPTION PRESENT . 
E 


——— itn 
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ER D POWER UP ROUTINES 

1891 .SBTTL POWER DOWN AND POWER UP ROUTINES 

1892 024132 012737 024142 000024 PWRDWN: MOV #PWRUP, 24 

1893 024140 000000 HALT 

1895 024142 012737 024132 000024 PWRUP: MOV #PWRDWN, 24 

1896 024150 012706 000500 MOV #B 

1897 024154 132737 000040 000321 BITB #40,$ENVM ;WILL APT ALLOW PRINTING? 

1898 024162 00100 BNE F 

1899 024164 004737 024216 JSR PC, PRTMSG “PRINT MESSAGE POINTED TO BY THE NEXT WORD 
1900 024170 024176 . WORD MSGPUF “USE THIS ADDRESS TO PRINT THE MESSAGE 
1901 024172 000137 000540 PFRES: JMP RESTR 

1902 024176 015 012 120 MSGPWF: .ASCIZ ae POWER FAILED!. 


TT TT —s eee 
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SUBROUTINE TO PRINT A MESSAGE 


“ 


1903 .SBTTL SUBROUTINE TO PRINT A MESSAGE 

1904 0 4216 017600 000000 PRTMSG: MOV a0(SP),RO OVE MESSAGE START ADDRESS TO RO 
1905 024 060716 000002 ADD SP5 ‘FUDGE RE TURN OVER STARTING ADDRESS PARAMETER 
1906 024226 132737 000040 000321 BITB #40,$ENVM “WILL APT ALLOW PRINTING? 

1907 024 001011 BNE 1$ BRANCH IF NO 

1908 024236 105737 177564 2$: TSTB  ~—s'TP'S Y READY 

1909 024242 100375 BPL 2$ MO WAIT 

1910 024244 112037 177566 MOVB (RO) +, TPB “PRINT CHARACTER 

1911 024250 001 BNE 2$ “NEXT IF NOT DONE. 

1912 024252 105737 177564 3$: TSTB ~—sO'TPS 

1913 024256 100375 BPL 3$ 

1914 024260 000207 1$: RTS PC 


be a a oy ee ri TE -_—- - ~~ 


ee eee ee ee a 


i 4 
CKKABDO 11/44 TRAPS MACRO M1113 11-NOV~81 10:05 PAGE 107 SEQUENCE 129 
SUBROUTINE TO PRINT A MESSAGE 


1915 000001 ~ END 


EO ee — ee ee ee ee ee ee eee ee - eee _——_—_-— _—— ——- - - -_— ——— 
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SYMBOL TABLE 





ABASE = 000000 CERMSK= 177413 PSW = 177776 TST110 017696 TST6 013364 
ACDW1 = 000000 CISMSG 023600 PTRP 022376 TST111 017776 TST6 013472 
ACDW2 = 000000 CPRISV 023462 PUIO 023372 IsTil¢ 020202 TST64 013600 
C = 000000 CPUERR= 177766 PUIOEN 023404 TST113 0 Ob¢e TST65 013706 
ACT 023540 CVECSV 023460 PVECSV 0 73% TST114 021170 TST 014014 
= 000000 lw 016752 PWRDWN Rs! 2 TST115 021444 TST 014122 
ADDW1 = 000000 DL11W1 016736 PwR 024142 1ST 116 0 $000 TST 002516 
ADDW10= 000000 023470 RCPUER 000502 TST117 O $8 6 TST70 Et 
ADDW11= 000000 FINISH 021154 RESTRT 000540 TST12 0033550 TST71 014356 
ADDW12= 000000 FIRST =%000005 RET 020750 TSTI¢0 0235030 TST7 014514 
ADDW13= 000000 FPP 021150 RET1 020770 TST1 003454 TST7 014620 
DW14= 000000 FSPL 021774 RET Oe tes TST14 8 554 TS774 §= 914744 
ADDW15= 000000 GIN) 020704 RET 02103 TST15 03656 TST75 6015056 
peer, = 000000 GIN2 020722 RET4 021020 1STI6 O06 036 TST76 4 §©.015166 
ADDW3 = 000000 IN3 021170 RTRAP = 000010 TST1 004356 TST77 §©015326 
Dw4 = 000000 GOAGIN 023560 RTRAP1= 000034 TST2 O01 ee TTCSR = 177564 
ADDWS = 000000 HERE = 000000 RTRAP2= 000020 TST20 004504 0 
= 000000 HLT = 000000 RT 0000 TST21 004576 4 
ADDW7 = 000000 ILLA = 004700 RTRAP4= 000014 TST $ 004676 
ADDWS = 000000 ILLB = 000100 RTRAPS= 0000 TST 005000 
ADDW9 = 000000 INST 021156 R6 =%0 TST24 005156 
ADEVCT= 000000 KTSTA 000506 R7 =%000007 TST25 p93) 
ADEVM = KTVEC 000504 SAVSTK 020546 TST26 5606 
ADJNC 020670 K1 000626 SEQ 021762 TST27 On 3708 
NV = K10 000644 SETPIR 022464 TST 00161 
NVM = 000000 K11 000646 SPI 022454 TST 006010 
AFATAL= 000000 K12 000650 SPSwW 022456 TST31 Boe 166 
= 000000 K2 000630 STATUS= 177776 TST 4 5 
AMADR2= 000000 K3 000632 T =%000003 TST 34 
AMADR3= 000000 K4 000634 021074 TST 6 
AMADR4= 000000 K5 000636 TABLE1 021044 TST35 ” 026 
AMAMS1= OO0000C K6 000640 TENSAV 020544 TST 71 
AMAMS2= 000000 K7 000642 TITLE 024006 TST 007306 
AMAMS3= 000000 LAST =%000001 TNCIS 060610 TST4 4 102 
AMAMS4= 000000 MLOOP 022130 TPB = 177566 TST40 644 
GAD= 000000 MSG 023723 TPS = 177564 TST4 007736 
= 000000 MSGNCI 024101 TRAPA = 000010 TST42 010036 
AMSGTY= 000000 MSGNFP 024036 TRAP10 oey2e8 TST4 010140 
AMTYP1= 000000 MSGPWF 024176 = 177560 TST44 10316 
AMTYP2= 000000 = TRP240 oecete TST45 19636 
AMTYP3= 000000 NXTPRT 023252 TRP244 020516 TS14 10 3 
AMTYP4= 000000 NXTST 022270 = a's ee TST4 oie 0 
APASS = 000000 OATSE 022776 TSFCIS 020550 TSTS5 002 $3 
APRIOR= 000000 ODADEN 023010 00 36 TSTSG) 3=—.: 071 ; 
AROUND 020636 PASSPT 023576 TST10 §©00 $e TST51 =.01131 
= 000000 PFRE 024172 TST100 015452 TSTS 911698 
ATESTN= 000000 PIRPSW 022460 TST101 015774 TST5 4 01 
= 000000 PIRQ = 177772 rei 016144 TST54 12112 
= 000000 InVC1= 000240 TST10 019670 TSTS5 4 216 $x = 025074 
AVECT1= 000000 PIRVC2= 000242 TST104 016764 TST36 12414 $XX = 177634 
AVECT2= 000000 P 023760 TST105 017142 TSTS 12740 $xxx = 000653 
BEGIN 000510 PPRISV 023466 TST106 017330 TST6 02416 $Y = 022044 
BELL = PQOTRP 022354 TST107 017516 TST60 13100 $YY = 022130 
BUF F 000500 PROFTE 016750 TST11 §©=©003012 TST61 013200 .$x = 000330 
CC = 177776 PRIMSG 024216 
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AUSWR 
AVECT1 
AVECT2 
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ees = ee = ee 
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CROSS REFERENCE 
VA 


i 


ae 


000510 


3 
17-393 


103-1862 


EQUENCE 132 
CREF vO1 


17-393 
103-1864 103-1866 #103-1871 


17-393 


17-393 


17-393 


#96-1487 
17-393 


16-389 #20-405 
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CREATED BY MACRO ON 11 


SYMBOL CROSS REFERENCE 


SYMBOL VALUE 


CKKABD 


CREF 


v01 


aep@+eeeeeeet#e#ee#eeseé i! 
DWDOUMOMAMKR—-—Oe- NBO Om 


moO. 


sreeenpes LU 
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NUMINSTTTNNOODODOO KM 


wo 
TOoOwruMo 
OOWOMOVOT TOM AMO. 
~ Ne OO OO Oe 
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436 


py mrt: 


MWOORKR DODO eK wren IN 
or+ree+etrernprestpeste b twee 
rR Ovr Ov @DOrvuO-NOMDMNOO- 
INS SF SIN OO Oe 


ee UmNoOoW 


102-1849 #102-1856 
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~~ 


REFERENCES 
#14-363 
#19-401 


0 


= 0002 
000500 


4 

= 177776 
177413 
023600 
023462 
177766 
023460 
016752 
016756 
023470 
021154 
%000005 
021150 
021774 
020704 





CREATED BY MACRO ON 11-NOV-81 AT 10:13 
CROSS REFERENCE 
AL 


177776 


022376 
023372 


023404 
023464 


REFERENCES 


#96-1503 
96- 


*102-1809 


96-1520 
#96-1565 
#103-1878 
*22-438 

76-1119 

77-1122 
*96-1503 
air ee 


a 
#105-1902 
wigen eee 


3 
#100-1740 
102-1851 
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PAGE ; 
SEQUENCE 134 
CREF v01 
#22=443 22-483 
96~1507 96-1513 96-1518  #96-1559 
23-489 23-492 *23=-496 23-497 23-500 
*23=-519 $728, 3-524 
24-536 24-538 4-541 24-541 24-544 
$3059 %23-495 *23-504 23-506 23-508 
24-536 
24-527 24-530 24-530 24-533 24-538 
96-151 
99-1716 99-1717 99-1728 99-1731 
#101-1799 
*103-1870 #103-1881 
99-1704 99-1705 #99-1736 
*100-1760 #100-1762 #100-1764 *100-1766 *100-1768 
*102-1847 
#102-1858 
*88-1330 9-1333 90-1349 91-1366 My ee 
bE -1490 103-1867 105-1899 #106-1 
*97=-15 *97-158 *97-1585 %*97-1594 *98-1597 
*98-1617 *98-161 98-1628 *98-1631 *98-1633 
#102-1845 


108-1859 


*23-503 
24-544 


#23-512 


24-547 


*100-1770 


94-1409 


98-1606 
98-1636 


23-505 
24-547 


23-514 


100-1772 


95-1430 


*98-1609 
*98-1659 
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CKKABD CREATED BY MACRO ON 11-NOV-81 AT 10:13 PAGE 4 
SEQUENCE 135 
SYMBOL CROSS REFERENCE CREF v01 
SYMBOL VALUE REFERENCES 
PWRDWN 024132 20-413 99-1711 #105-1892 105-1895 
PWRUP 024142 105-1892 #105-1895 
RCPUER 000502 #19-402 63-1011 *63-1012 63-1015 68-1076 *+*68-1077 68-1078  *88-1279  *88-1280 
88-1285 88-1288 88-1307  *88-1508 88-313 88-1316 *97-1576 97-1577 97-1578 
*97-1588 97-1589 97-1590 
RESTRT 0054 20-408 #20-411 103-1880 105-1901 
RET 020750 96-1504 #96-1510 
RET1 020770 96-1511 #96-1513 
RET2 021012 96-1514  #96-1516 
RETS 021032 96-1517 #96-1518 
RETS 021020 96-1452 #96-1517 
RTRAP = 10 #14-367 *26-565 *27-571 *28-577 *29-583 *29-590 * 30-600 «30-601 *30-611 
«30-612 «53-890 *54-896 *55-902 *56-908 *56-915 #57=-923 #57=924 #57-934 
pe La *58-946 *59=952 *60-958 *61-965 *61-972 *62-980 *62-981 *62-991 
® ~ 
RTRAP1 = 000034 ote 295 «31-628 «32-634 * 33-640 * 34-646 #34~-653 * 35-660 * 35-661 #35-671 
e - 
RTRAP2 = 000020 Wib-357 #37696 *38-702 39-708 40-714 40-721 #41-729 = #41-730 = *41-740 
aie = 
RTRAPS = 000030 ‘io *42=755 «43-761 44-767 #45-773 *45-780 *46-788 #46-789 #46-799 
e = 
RTRAP4 = 000014 #14-355 —-*48-B23. 49-829 «850-835 51-841 51-849 —-*52-857 = *52-858 = * 52-868 
*52-869 *79=1142 80-1151 *81-1161 
RTRAPS = 000004 #14-354 *63-100 #64-1019 65-1025 66-1033 66-1040 +*67-1048 *67-1049 *67-1059 
*67-1060 *97-1569 *97-1581 
R6 =%000006 #14-348 *20~41 *22-437 #22-438 Set #22-442 #22-443 2-444 #22-447 
22-448 22-448 2-449 #22452 #22-454 22-455 *22-458 *22-460 22-461 
*22-464 *22-466 *22-470 *22-472 22-473 *22-476 «22-478 *22-482 22-483 
-484 #234 *23~491 #23-498 #23~-499 *23-506 #23-507 #23-514 #23-515 
*23-522 #23=523 *68-1071  *68-1073 69-1082  *69-1084 69-1085 *70-1 *70-1095 
70-1097 *70-1099 = 70-1107) = #71-1714 0872-1115) = *735-1116 0) #74-1117 = #75-1118 = * 76-1119 
76-1120 9 *77-1122 «= #781127 Ss *78-1128 )3=— #781129) *78-1130 = *78-1151 = * 78-11 *78-1133 
*78-1134 *78-1135 *78-11 *85~-1 *85-1214 85-1220 *85-1226 *86-1235 +*87-1249 
£89-1337  *90-1351 *91-1368 *93-1396 *93-1398  +*93-1399 *94-1412 *94-1420 
R7 = #14~-350 *85-1210 *85-1216 *85-1222 *85-1229 
SAVSTK 020546 #96-1467 *96-1473 96-1474 -14 
SEQ 021762 98-1595 ~1640 
SETPIR 022464 169 #100-1744 
SPIR 022454 ays 5 1687 #99-1734 100-1745 100-1747 100-1749 100-1751 100-1755 100-1755 
SPSW 022456 “o_ieee ae. eer pest 2 98-1615  *98-1628 98-1629  *98-1636 98-1637 *99-1686 
STATUS = 177776 #14-365 425-551 #25557 88-1304 “oP-l 750 #89-1341 90-1352 *90-1358  *91-1569 
*93-1404 2*94-1414 “1417 *94-1425 94-1425 *95-1443 95-1446 
TAB = #14-344 96-1484 *96-1487 96-1498  +*96-1499 
TABLE 021074 96-1487  #96-1534 
TABLE1 2104 96-1484  #96-1522 
TENSAV 020544 *96-1454 146 96-1497 
TITLE 024006 -410 #104-1887 
TNCIS 020610 -1471 96-147 
TPB = 177566 #14-362 #95-1438 95-1441 *106-1910 
TPS = 177564 #14-361 88-1327 *95-1432 95-1436 95-1439 +*95-1442 *95-1450 106-1908 106-1972 


ene eee a 








CKKABD CREATED BY MACRO ON 11-NOV-81 AT 10:13 pase t. 


SEQUENCE 
SYMBOL CROSS REFERENCE CREF vO1 
TRAPA. = 000010 #14-366. 26-566. = 27-572 = 28578 = 29586 = 29~593 «30-602 30-613 
TRAPIO 020526 96-1455  #96-1460 
TRCSR = 177560 #14-360  #92-1388 ~=—-92-1392 
TRP240 022462 #99-1689 *99-1691 99-1699 99-1715. -#100=1741 
TRP244 020516 96-1453  #96-1458 

= 3 #14-353. 48-824. 49-830. = 50-836 = 51-844 «51-852 52-859 = 52-870 75=1118 
TSFCIS 020550 96-1457 #96-1468 96-1493 
52 20-422 422-436 
TST10 002620 28-575. 28-580  #29-581 
TST100 015452 84-1195 84-1206 #85-1207 
TST101 015774 85-1207 85-1233 486-1234 
TST102 016144 #87-1248 
|TST103 016270 #88-1262 
04 016764 #89~1332 
TST105 = 17142 - 
06 017330 #91~1365 
TST107 017516 #92~138% 
TST11. 003012 29-581 29-597 #30-598 
TST110 017652 92-1384 92-1393 #93-1395 
TST111 017776 #94-1408 
TST112 020202 995-1429 
TST113 020424 #96-1452 
TST114 021170 497-1566 
TST115 021444 #98-1595 
TST116 022000 499-1660 
TST117 022656 99-1714 99-1725 #101-1785 
2 003350 
TST120 023030 #102-1802 
TST1 003454 #32~632 
TST14 003554 32-632 32-637 +=: # 33-638 
TST15 ©»: 003656 33-638 © 33-643 434-644 
TST16 © 004032 “644 34-657 435-658 
TST17 35-658 35-682 - 
001232 22-436 22-485 23-486 
TST20 937-694 
TST21 004576 37-694 #38-700 
TST22 004676 38-700 38-705 #39706 
TST23 —-005000 39-706 39-711 = #40-71 
TST24 005156 40-712 40-726 #4172 
TST25 © 005514 #42-75 
TS126 (005606 42-753 #43-759 
TSt27 005706 43-759 ~764 #765 
001612 23-486 23-525 #24-526 
TST30 10 44-765 44-770 = 45-771 
TST31 006166 45-771 45-785  —#46-786 
TST32 006506 46-786 46-808  #47-809 
TST33 006634 #48-821 
006726 48-821 #49-827 
TST35 007026 49-827 49-832 450-833 
30 50-833 50-838 451-839 
TST37 007306 51-839 51-854 452-859 
1ST 002102 24-526 24-548 = #25~549 


CKKABD 


SYMBOL 
SYMBOL 
TST40 
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REFERENCES 


#17-393 
#17-393 


454-894 


62-1000 


44-1022 
v2-1028 
67-1068 


69-1086 
#71-1114 


27-574 
#77-1122 


#80-1149 
80-1158 


26 
#18-395 


20-407 


103-1863 


#55-900 
#58-944 


#60-956 
#26-563 


#68-1069 


#70-1087 
#28-575 
#81-1159 


#82-1168 
#83-1178 
*89-1344 
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EQUENCE 157 
CREF 


v01 


*90-1354 


103-1865 #103-1874 


105-1897 


106-1906 


2 


*90-1363 


«91-1370 


*92-1387 


92-1390 


94-1416 


